Μέλας Κύων Δημοσ. 15 Νοεμβρίου 2007 Share Δημοσ. 15 Νοεμβρίου 2007 καλησπερα. Εχω σε φόρμα ενα ΤΕdit πλαίσιο κειμένου κι ένα κουμπί. θέλω πατώντας το κουμπί να εμφανίζει μήνυμα με messagebox το κείμενο που είναι γραμμένο μέσα στο ΤΕdit πλαίσιο κειμένου. Προσπάθησα στην αρχή ως εξής: var S : string; begin S:= Edit1.text; // περνώ στην S το κειμενο application.messagebox('Tιτλος μηνυματος','Eγραψες '+S , mbInformation , [MBok] ..etc...) To προβλημα είναι στο S: Μου βγαζει μήνυμα λαθους ότι υπαρχει ασυμβατότητα αναμεσα σε string δηλ. το Edit1.text και σε τυπο PAnsiChar. Προφανώς πρεπει να μετατρέψω το Edit1.text σε PAnsiChar για να το περάσω ως παραμετρο στη messagebox. Εχει καποιος ιδεα πως μπορω να κανω μετατροπή απο string σε PAnsiChar ή τελος παντων πως μπορω να ξεπερασω το προβλημα? Συνδέστε για να σχολιάσετε Κοινοποίηση σε άλλες σελίδες άλλες επιλογές
GCMH Δημοσ. 15 Νοεμβρίου 2007 Share Δημοσ. 15 Νοεμβρίου 2007 Μια λύση θα ήταν αντί για την application.messagebox να χρησιμοποιούσες τη ShowMessage() ή τη MessageDialog(), που δέχονται απευθείας string. Ενημέρωση: Κατά μια άλλη εκδοχή μπορείς να κάνεις και κάτι άλλο: var S : string; pp: pansichar; begin S:= 'Eγραψες '+Edit1.text; pp:=@s[1]; application.messagebox('Tιτλος μηνυματος' ,pp , mbInformation , [MBok] ..etc...) Συνδέστε για να σχολιάσετε Κοινοποίηση σε άλλες σελίδες άλλες επιλογές
sivadWS2 Δημοσ. 15 Νοεμβρίου 2007 Share Δημοσ. 15 Νοεμβρίου 2007 Δοκίμαζε πρώτα το αυτονόητο application.messagebox('Tιτλος μηνυματος',Pchar('Eγραψες '+S) , mbInformation , [MBok] ..etc...) Συνδέστε για να σχολιάσετε Κοινοποίηση σε άλλες σελίδες άλλες επιλογές
Μέλας Κύων Δημοσ. 16 Νοεμβρίου 2007 Μέλος Share Δημοσ. 16 Νοεμβρίου 2007 EYXAPIΣΤΩ ΠΑΙΔΙΑ Συνδέστε για να σχολιάσετε Κοινοποίηση σε άλλες σελίδες άλλες επιλογές
Directx Δημοσ. 17 Νοεμβρίου 2007 Share Δημοσ. 17 Νοεμβρίου 2007 Υπάρχει και η MessageDlg Συνδέστε για να σχολιάσετε Κοινοποίηση σε άλλες σελίδες άλλες επιλογές
Προτεινόμενες αναρτήσεις
Αρχειοθετημένο
Αυτό το θέμα έχει αρχειοθετηθεί και είναι κλειστό για περαιτέρω απαντήσεις.