Hallo alle zusammen
Nun in einen Editfeld soll nur der Name vorkommen ,nich Otto.txt sondern nur
Otto
Delphi-Quellcode:
procedure TForm5.Button1Click(Sender: TObject);
begin
if OpenDialog1.Execute then
Memo1.Lines.LoadFromFile(OpenDialog1.FileName);
if Edit1.Text = '' Then
Edit1.Text := [color=#ff0044]ExtractFileName[/color](OpenDialog1.FileName);
end;
Wer hatt Rat?
Gruß ,Tino