OpenDialog Zuweisung

[Grolle]

Hallo Steve!
Ich schick dir am Besten nochmal den Quelltext bevor
ich hier Amok laufe:

Delphi-Quellcode:

var
FileName: string;

begin
  OpenDialog1.Execute;
  if (LowerCase(FileName)='.htm') OR (LowerCase(FileName)='.html') then
  begin
    PageControl1.ActivePage := TabSheet1;
    SynEdit1.Lines.LoadFromFile(OpenDialog1.FileName);
  end;
  if (LowerCase(FileName)='.php') or (LowerCase(FileName)='.php3')or
  (LowerCase(FileName)='.php4')or (LowerCase(FileName)='.dat') then
  begin
    PageControl1.ActivePage := TabSheet2;
    SynEdit2.Lines.LoadFromFile(OpenDialog1.FileName);
  end;
  if (LowerCase(FileName)='.pas') then
  begin
    PageControl1.ActivePage := TabSheet3;
    SynEdit3.Lines.LoadFromFile(OpenDialog1.FileName);
  end;

end;

Viele Grüße: Grolle