Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Sonstige Fragen zu Delphi (https://www.delphipraxis.net/19-sonstige-fragen-zu-delphi/)
-   -   Delphi String einsetzten (https://www.delphipraxis.net/100519-string-einsetzten.html)

ralle15 29. Sep 2007 13:35


String einsetzten
 
hallo ich möchte die druckgröße mittels edit feldes ändern, ich bekomme den string aber nicht hin

original:
PrintImage(Image1, 85);

meine Änderung:

text2 := string(Edit1.Text);
PrintImage(Image1,(string(text2))); ( ist aber falsch )

[Fehler] druck.pas(230): Inkompatible Typen: 'Integer' und 'String'

Danke für eure hilfe

Klaus01 29. Sep 2007 13:46

Re: String einsetzten
 
Wie die Fehlermeldung schon sagt,
must Du den String in einen Integer wandeln.
Dafür kannst Du StrToInt verwenden.

grüße
Klaus

Namenloser 29. Sep 2007 13:47

Re: String einsetzten
 
Hallo,

willkommen in der DP :party: :dp:

Also, ich kenne zwar die Funktion printImage nicht, aber offensichtlich erwartet sie als zweiten Parameter eine Zahl, also einen Integer. Du übergibst ihr jedoch einen String, was ja auch die fehlermeldung schon sagt.
Was du brauchst ist glaube ich eine Funktion, die einen string in eine Zahl umwandelt. ine solche Funktion bietet Delphi bereits und sie heißt Delphi-Referenz durchsuchenStrToInt
Delphi-Quellcode:
PrintImage(Image1,StrToInt(text2));
Übrigens hast du einen etwas merkwürdigen Programmierstil: Du weist nämlich die Eigenschaft "text" eines TEdit, die ein String ist, einer anderen String-Variable zu. Dabei führst du sogar noch einen TypeCast aus, was in diesem Falle völlig unnötig ist, weil du ja bereits einen String hast.
Du könntest also ohne Probleme auch folgendes schreiben:
Delphi-Quellcode:
PrintImage(Image1,StrToInt(edit1.text));
Eventuell solltest du dir mal die Grundlagen-Tutorials auf dsdt.info anschauen.

ralle15 29. Sep 2007 13:58

Re: String einsetzten
 
Danke schön hat mir sehr geholfen, und wieder etwas dazugelernt
Danke


Alle Zeitangaben in WEZ +1. Es ist jetzt 07:23 Uhr.

Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024-2025 by Thomas Breitkreuz