Menu Funktionen programmieren

[DeddyH]

Zeig mal den gesamten Code.

[astiope]

Delphi-Quellcode:

procedure TForm1.ffnen1Click(Sender: TObject);

begin
    if dlgOpen.Execute then
  begin
    (* Hier das, was mit den Dateinamen geschehen soll *)

end;

end.

[DeddyH]

Da fehlt ein "end;" (mit Semikolon am Ende), wie vermutet. Übrigens formatiere Delphi-Code doch bitte mit den entsprechenden Tags (der Helm im Beitragseditor), Danke.

[astiope]

Also ich habe das Befehl end; reingeschrieben aber trotzdem stoppt es.Schreiben sie mal wie sie es sich das vorstellen.

Delphi-Quellcode:

procedure TForm1.ffnen1Click(Sender: TObject);

begin
    if dlgOpen.Execute then
end;

begin
    (* Hier das, was mit den Dateinamen geschehen soll *)

end;

end.

oder korrigieren sie mal dieses code komplett

[DeddyH]

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

[astiope]

Der kompiler hängt trotzdem da wo if dlgOpen.Execute then geschrieben steht warum weiß ich nicht.

fehlt irgendwas ?

gruß

[DeddyH]

Was heißt "der Compiler hängt"? Ist die Zeile rot markiert? Dann müsste auch eine Fehlermeldung zu sehen sein, die besagt, was falsch ist.

[grl]

Zitat von DeddyH:

Delphi-Quellcode:

procedure TForm1.ffnen1Click(Sender: TObject);

      (* Hier das, was mit den Dateinamen geschehen soll *)

Diese Zeile muss natürlich durch sinnvollen Code ersetzt werden. Mach mal einfach ein // an den beginn der Zeile, dann sollte zumindest der Compiler ruhe geben und ein Dialog erscheinen...

Die Zeile schaut dann so aus:
      //(* Hier das, was mit den Dateinamen geschehen soll *) Gruß
Luggi

PS: Und bitte: Lerne zuerst einige Grundlagen von Delphi oder Pascal. Entsprechende Links sind hier ja schon gepostet worden!

[DeddyH]

Öhm, (* *) ist ein gültiger Kommentar, den muss man nicht noch einmal kommentieren

[astiope]

Richtig an dieser stelle ist die zeile rot markiert:

der fehler lautet: Undefinierter bezeichner dlgOpen

- wie sie es meinten habe ich schon bereits versucht aber hat nichts bei gebracht