Hjælp til delphi! -= HASTER =-

Drop en pagecontrol1 og en opendialog1 på din form

procedure TForm1.Button1Click(Sender: TObject);
var
tabsheet : Ttabsheet;
memo : tmemo;
begin
if opendialog1.Execute then
TabSheet := TTabSheet.Create(self);

    tabsheet.PageControl := pagecontrol1;

      tabsheet.caption := extractfilename(opendialog1.FileName);
      memo :=tmemo.create(self);

      with memo do

      begin
      parent := tabsheet;
      Align := alclient;


      memo.Lines.loadfromfile(opendialog1.FileName);

        end;
end;

Du skal bare udskifte memo med din synedit

Stoney

THX STONEY! Du har jo løst næsten alle de spørgsmål jeg har oprettet! :)
Og endnu et :)....Du må være NØRD til programmering (ikke negativt ment)

MVH
Mr.Meincke