MessageBox() und Text zum Ausgeben in Delphi

Fragen zu allen anderen Programmiersprachen.
Benutzeravatar
AND51
Beiträge: 5220
Registriert: 01.10.2005 13:15

Beitrag von AND51 »

@ Kiffi: Die Osterferien gehen ja nur 14 tage... Danach bin ich aber im Anschluss 10 Tage in England, Andover, d. h. es sind 24 Tage ich habe mich verrechnet :oops: :oops:

Hast aber trotzdem schon Recht! :-P :D
PB 4.30

Code: Alles auswählen

Macro Happy
 ;-)
EndMacro

Happy End
Benutzeravatar
PBZecke
Beiträge: 399
Registriert: 02.09.2004 17:34

Beitrag von PBZecke »

Hallo!

Hat ja zwar noch Zeit aber hier ist schon einmal die Lösung:

Code: Alles auswählen

a:=MessageBox(Form1.Handle, Pchar('Benötige Zeit: '+IntToStr(start)+' ms.'), 'MyMsgBox', MB_OK);
Nein, ich habe die Suche nicht benutzt, und deshalb auch nichts dazu gefunden... :lol:
Benutzeravatar
AND51
Beiträge: 5220
Registriert: 01.10.2005 13:15

Beitrag von AND51 »

danke!
PB 4.30

Code: Alles auswählen

Macro Happy
 ;-)
EndMacro

Happy End
Benutzeravatar
AND51
Beiträge: 5220
Registriert: 01.10.2005 13:15

Beitrag von AND51 »

So, ich probiere dies gerade live in er Schule aus und mich sieht grad keiner, wie ich hier im Inet surfe, um mich zu bedanken.

@ TS-Soft:

Code: Alles auswählen

For n:=1 To 1000 do MessageBox(Form1.Handle, 'Danke!', '', MB_OK);
@ Zecke: Danke, deine Lösung war korrekt!
PB 4.30

Code: Alles auswählen

Macro Happy
 ;-)
EndMacro

Happy End
Antworten