Entwickler-Ecke

Delphi Language (Object-Pascal) / CLX - MessageBox: Wert von Variblen und Text ausgeben?


crushead777 - Fr 16.09.05 15:27
Titel: MessageBox: Wert von Variblen und Text ausgeben?
Hi,
wie kann ich in einer MessageBox normalen Text und dazwischen den Wert einer Variablen ausgeben. Also theoretisch dachte ich so etwas wie:


Delphi-Quelltext
1:
Application.MessageBox('Die Auszahlung von ' + Geldbetrag + ' ist erfolgt.''Kassenautomat - Auszahlung erfolgreich', MB_OK);                    


Vielen Dank schon mal
crushead777

Moderiert von user profile iconGausi: Code- durch Delphi-Tags ersetzt.
Moderiert von user profile iconKlabautermann: Topic aus Sonstiges verschoben am Fr 16.09.2005 um 18:12


Narses - Fr 16.09.05 15:32

Moin und :welcome: im Forum!

Ich unterstelle mal, dass Geldbetrag: Integer; deklariert ist:

Delphi-Quelltext
1:
2:
3:
4:
5:
Application.MessageBox('Die Auszahlung von '
                       +IntToStr(Geldbetrag)
                       +' ist erfolgt.',
                       'Kassenautomat - Auszahlung erfolgreich'
                       MB_OK);

cu
Narses


crushead777 - Fr 16.09.05 15:42

Hi,
erstmal, Danke für die superschnelle Antwort!!! :)
Aber so hatte ich es schon getesten, aber dann kommt die Meldung inkompatible Typen 'extended' und 'string' und 'string' und 'pchar'.
Geldbetrag ist übrigens als Real deklariert.
Danke noch mal
crushead777


GTA-Place - Fr 16.09.05 15:57

Dann mach aus IntToStr(); -> FloatToStr();


Pdd - Fr 16.09.05 15:58

Dann must du statt inttostr() floattostr() nehmen!

Oh mist zu spät :lol:
:(


uall@ogc - Fr 16.09.05 16:05

und den ganzen text musst du nochmal mit einem PChar() einklammern


Delphi-Quelltext
1:
2:
3:
4:
5:
Application.MessageBox(PChar('Die Auszahlung von '
                       +IntToFloat(Geldbetrag)
                       +' ist erfolgt.'),
                       'Kassenautomat - Auszahlung erfolgreich'
                       MB_OK);


crushead777 - Fr 16.09.05 18:07

Hi,
ich frag ungern noch mal nach, aber es geht immer noch nicht...
Ich habe es mit PChar umklammert (was bringt das eigentlich?) und statt IntToFloat FloatToStr genommen, was sicherlich gemeint war, weil ich ja gar keine Interger habe.
Was mach ich denn jetzt noch falsch?
Trotzdem danke
crushead777


GTA-Place - Fr 16.09.05 18:09

Was kommt denn für eine Fehlermeldung?


crushead777 - Fr 16.09.05 18:33

sry, hatte ich vergessen: inkompatible Typen: 'String' und 'Extended'


Delete - Fr 16.09.05 18:59

Zeig mal deinen momentanen Quellcode.


crushead777 - Mo 19.09.05 16:07


Delphi-Quelltext
1:
2:
3:
4:
5:
Application.MessageBox(PChar('Die Auszahlung von '
                       +FloatToStr(Betrag)
                       +' Euro ist erfolgt.'),
                       'Kassenautomat - Auszahlung erfolgreich',
                       MB_OK);


Aber danke, jetzt geht er auf jeden fall! Ich weiß nicht warum er da net funktioniert hatte...
Aber ich hab noch eine kurze frage: wie kann ich x^y rechnen?
Nochmals Danke
crushead777

Moderiert von user profile iconKlabautermann: Delphi-Tags hinzugefügt.


Klabautermann - Mo 19.09.05 16:18

Hallo,
user profile iconcrushead777 hat folgendes geschrieben:
Aber ich hab noch eine kurze frage: wie kann ich x^y rechnen?

mache bitte auch für ganz kurze Fragen ein neues Thema auf oder benutze die Suche.

Gruß
Klabautermann