|
Registriert seit: 17. Sep 2006
Ort: Barchfeld
27.655 Beiträge
Delphi 12 Athens
|
AW: Menu Funktionen programmieren
18. Jun 2012, 13:11
Delphi-Quellcode:
procedure TForm1.ffnen1Click(Sender: TObject);
begin //Anfang der Methode
if dlgOpen.Execute then
begin //Anfang der Abfrage
(* Hier das, was mit den Dateinamen geschehen soll *)
end; //Ende der Abfrage
end; //Ende der Methode
end. //Ende der ganzen Unit
Detlef
"Ich habe Angst vor dem Tag, an dem die Technologie unsere menschlichen Interaktionen übertrumpft. Die Welt wird eine Generation von Idioten bekommen." (Albert Einstein)
Dieser Tag ist längst gekommen
|