Autor |
Beitrag |
Delphi2009lover
      
Beiträge: 176
|
Verfasst: Di 03.11.09 16:22
Hi
ich wollt nur fragen, wie ich antstatt
Application.Messagebox('Der Text',.....);
z.B.
das
Application.Messagebox(Die_Variable,... );
schreiben kann, also anstatt den Text eine Variable
|
|
DonManfred
      
Beiträge: 148
Erhaltene Danke: 2
Windows 7
Delphi XE3 Pro + HTML5Builder
|
Verfasst: Di 03.11.09 16:27
Wieso probierst du es nicht einfach aus?
PS: Solange "Die_Variable" ein String ist sollte das gehen...
_________________ Gruss Manfred
|
|
Delphi2009lover 
      
Beiträge: 176
|
Verfasst: Di 03.11.09 16:36
hab ich ja leider kommt da aber der Fehler
[Pascal Fehler] Main.pas(99): E2010 Inkompatible Typen: 'string' und 'PAnsiChar'
|
|
Lannes
      
Beiträge: 2352
Erhaltene Danke: 4
Win XP, 95, 3.11, IE6
D3 Prof, D4 Standard, D2005 PE, TurboDelphi, Lazarus, D2010
|
Verfasst: Di 03.11.09 17:02
Hallo,
Delphi-Quelltext 1:
| Messagebox(PChar(Die_Variable),... ); |
_________________ MfG Lannes
(Nichts ist nicht Nichts) and ('' <> nil ) and (Pointer('') = nil ) and (@('') <> nil )
|
|
Luckie
Ehemaliges Mitglied
Erhaltene Danke: 1
|
Verfasst: Di 03.11.09 21:26
Delphi2009lover hat folgendes geschrieben : | hab ich ja leider kommt da aber der Fehler
[Pascal Fehler] Main.pas(99): E2010 Inkompatible Typen: 'string' und 'PAnsiChar' |
Sicher dass der Fehler bei Application.Messagebox kommt?
|
|
aim65
      
Beiträge: 312
Win 9x, Win XP
Delphi 3pro, 7PE
|
Verfasst: Do 05.11.09 12:38
Hallo Luckie,
Bei mir ist das auch so, bei "Application.MessageBox". Geht nur mit "PChar(txtvar)".
Verwende hier allerdings Steinzeit (D3).
Gruß, Horst
|
|
Lannes
      
Beiträge: 2352
Erhaltene Danke: 4
Win XP, 95, 3.11, IE6
D3 Prof, D4 Standard, D2005 PE, TurboDelphi, Lazarus, D2010
|
Verfasst: Do 05.11.09 13:02
Hallo,
dann ist die Steinzeit bei TurboDelphi auch noch nicht zu Ende, auch dort kommt die Funktion nicht mit einer String-Variable zurecht.
[OT] D3 = Steinzeit = schnell  [OT]
_________________ MfG Lannes
(Nichts ist nicht Nichts) and ('' <> nil ) and (Pointer('') = nil ) and (@('') <> nil )
|
|
Andreas L.
      
Beiträge: 1703
Erhaltene Danke: 25
Windows Vista / Windows 10
Delphi 2009 Pro (JVCL, DragDrop, rmKlever, ICS, EmbeddedWB, DEC, Indy)
|
Verfasst: Do 05.11.09 13:16
|
|