Hallo!
Ich möchte gerne verhindern, das bei einem bestimmten FileName im Öffnen Dialog das TRichEdit beschrieben werden kann... dazu dachte ich würde derfolgende Code funzen...
Delphi-Quellcode:
procedure TTMPV.ffnen1Click(Sender: TObject);
begin
if Open.Execute then //Open ist der OpenDialog
begin
if Open.FileName = 'ICCVerlauf.sitmp' then
begin
TempVIewer.ReadOnly := true; //TempViewer ist das RichEdit
end;
TempViewer.Lines.LoadFromFile(Open.FileName);
end
else
TempViewer.Lines.Clear;
end;
Aber denkste...
Woran liegt das bzw. wie muss ich das richtig machen?