| Autor |
Beitrag |
crushead777
Hält's aus hier
Beiträge: 14
|
Verfasst: Fr 16.09.05 15:27
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  Gausi: Code- durch Delphi-Tags ersetzt.Moderiert von Klabautermann: Topic aus Sonstiges verschoben am Fr 16.09.2005 um 18:12
|
|
Narses
 
Beiträge: 10183
Erhaltene Danke: 1256
W10ent
TP3 .. D7pro .. D10.2CE
|
Verfasst: Fr 16.09.05 15:32
Moin und  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 
Hält's aus hier
Beiträge: 14
|
Verfasst: 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
Beiträge: 5248
Erhaltene Danke: 2
WIN XP, IE 7, FF 2.0
Delphi 7, Lazarus
|
Verfasst: Fr 16.09.05 15:57
Dann mach aus IntToStr(); -> FloatToStr();
_________________ "Wer Ego-Shooter Killerspiele nennt, muss konsequenterweise jeden Horrorstreifen als Killerfilm bezeichnen." (Zeit.de)
|
|
Pdd
Beiträge: 142
Win XP
Delphi 7
|
Verfasst: Fr 16.09.05 15:58
Dann must du statt inttostr() floattostr() nehmen!
Oh mist zu spät 
 _________________ Wenn alles steht und nix mehr looft, denn isses was von Meikrosooft
|
|
uall@ogc
Beiträge: 1826
Erhaltene Danke: 11
Win 2000 & VMware
Delphi 3 Prof, Delphi 7 Prof
|
Verfasst: 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); | _________________ wer andern eine grube gräbt hat ein grubengrabgerät
- oder einfach zu viel zeit
|
|
crushead777
Hält's aus hier
Beiträge: 14
|
Verfasst: 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
Beiträge: 5248
Erhaltene Danke: 2
WIN XP, IE 7, FF 2.0
Delphi 7, Lazarus
|
Verfasst: Fr 16.09.05 18:09
Was kommt denn für eine Fehlermeldung?
_________________ "Wer Ego-Shooter Killerspiele nennt, muss konsequenterweise jeden Horrorstreifen als Killerfilm bezeichnen." (Zeit.de)
|
|
crushead777
Hält's aus hier
Beiträge: 14
|
Verfasst: Fr 16.09.05 18:33
sry, hatte ich vergessen: inkompatible Typen: 'String' und 'Extended'
|
|
Luckie
Ehemaliges Mitglied
Erhaltene Danke: 1
|
Verfasst: Fr 16.09.05 18:59
Zeig mal deinen momentanen Quellcode.
|
|
crushead777
Hält's aus hier
Beiträge: 14
|
Verfasst: 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 Klabautermann: Delphi-Tags hinzugefügt.
|
|
Klabautermann
Beiträge: 6366
Erhaltene Danke: 60
Windows 7, Ubuntu
Delphi 7 Prof.
|
Verfasst: Mo 19.09.05 16:18
Hallo,
| crushead777 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
|
|
