Einzelnen Beitrag anzeigen

Benutzerbild von Ultimator
Ultimator

Registriert seit: 17. Feb 2004
Ort: Coburg
1.860 Beiträge
 
FreePascal / Lazarus
 
#42

Re: SchredderProg (mit source) gesucht!

  Alt 3. Jul 2004, 19:02
*hyperventilier*
Delphi-Quellcode:
procedure TMainForm.Button1Click(Sender:TObject);
begin
if OpenDialog1.Exexute then //das Ding öffnen
Edit1.Text:=OpenDialog1.FileName; //reinschreiben
end;
Neue Frage, neuer Thread!
Julian J. Pracht
  Mit Zitat antworten Zitat