Forum: Win32/Win64 API (native code)
Delphi
by idontwantaname,
20. Nov 2004
tja, dann drückt man auf den button, es erscheint die messagebox und dann? .... nichts
du musst das schon in die OnCloseQuery-procedure geben und dann mit case abfragen, was geschehen soll, was aber eh schon in den letzten posts erklärt wurde
Forum: Win32/Win64 API (native code)
Delphi
by idontwantaname,
19. Nov 2004
zuerst öffnest du eine datei, mit einem opendialog, oder?
jetzt definierst du eine variable (z.B: dateiname)
var
Form1: TForm1;
dateiname:String;
und dann in der procedure:
dateiname := ExtractFileName(OpenDialog1.Filename);
Forum: Win32/Win64 API (native code)
Delphi
by idontwantaname,
19. Nov 2004
du kannst das weglassen
case Application.MessageBox('Wollen Sie wirklich beenden?','MeinProgramm',MB_YESNOCANCEL or MB_ICONQUESTION) of
Forum: Win32/Win64 API (native code)
Delphi
by idontwantaname,
19. Nov 2004
filename ist nur ne variable, die luckie in seinem sample gepostet hat, eigentlich völlig unwichtig, nur halt, falls du sowas wie nen texteditor machst, das filename der name der gerade geöffneten datei ist.