Delphi-PRAXiS
Seite 3 von 4     123 4      

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   GUI-Design mit VCL / FireMonkey / Common Controls (https://www.delphipraxis.net/18-gui-design-mit-vcl-firemonkey-common-controls/)
-   -   Delphi zahl durch ein Zeichen ersetzen ? (https://www.delphipraxis.net/114637-zahl-durch-ein-zeichen-ersetzen.html)

Sherlock 29. Mai 2008 10:23

Re: zahl durch ein Zeichen ersetzen ?
 
Grafisch vergrößern? Mach das ganze Edit größer. Wenns was feineres werden soll, dann musst du halt nach anderen Komponenten suchen, aber Spinedit nennt man sowas, das macht dann die Suche leichter. ;)

Edit: Falls es um den Wert geht, dann schau Dir mal Increment, MaxValue und MinValue an.

Sherlock

Delphiturbo 29. Mai 2008 10:27

Re: zahl durch ein Zeichen ersetzen ?
 
ich meine die Pfeilen nur

DeddyH 29. Mai 2008 10:29

Re: zahl durch ein Zeichen ersetzen ?
 
Hast Du denn Deinem UpDown auch das Edit zugewiesen?

Delphiturbo 29. Mai 2008 12:57

Re: zahl durch ein Zeichen ersetzen ?
 
ja
aber es ist unterschied
wenn ich eine Format für SpinEdit zuweise, dann funktioniert nicht
und ohne Format läuft !
Delphi-Quellcode:
Edit1.text := Format('%.5d', [UpDown1.Position]); // ok
SpinEdit1.Text := Format('%.5d', [UpDown1.Position]); // nicht !

rollstuhlfahrer 29. Mai 2008 14:06

Re: zahl durch ein Zeichen ersetzen ?
 
Zitat:

Zitat von Delphiturbo
Delphi-Quellcode:
Edit1.text := Format('%.5d', [UpDown1.Position]); // ok
SpinEdit1.Text := Format('%.5d', [UpDown1.Position]); // nicht !

mal so ganz nebenbei: SpinEdit ist nur für Zahlen gedacht und hat somit auch kein .Text sondern wie man über den OI sehen sollte nur ein .Value (Integer). Dem kannst du Zahlen zuweisen. Deine nette Formatierung mit %.5d ist dann aber auch im Eimer, die kannst du aber beim Auslesen wieder herstellen.

rollstuhlfahrer

Delphiturbo 29. Mai 2008 14:13

Re: zahl durch ein Zeichen ersetzen ?
 
wie kann ich beim Auslesen meine 0000 wieder wiederherstellen ?

Die Muhkuh 29. Mai 2008 14:14

Re: zahl durch ein Zeichen ersetzen ?
 
Mit Format? :roll:

Delphiturbo 29. Mai 2008 15:45

Re: zahl durch ein Zeichen ersetzen ?
 
Lösung gefunden sowohl für Edit.Text als auch für den SpinEdit :firejump:
In Edit1.Text muss nicht nun immer von 0 anfangen

Delphi-Quellcode:
procedure TForm1.Edit1Change(Sender: TObject);
begin
UpDown1.Position := StrToInt(Edit1.Text); // das war's. Mehr nicht
// das heisst immer eine neue Position zuweisen (Onchange)
fast aufgegeben :wall:

FAlter 29. Mai 2008 15:49

Re: zahl durch ein Zeichen ersetzen ?
 
Hi,

wenn das Edit mit dem UpDown vernüpft ist, ergibt das eine Endlosschleife:

Edit.Text geändert -> OnChange
OnChange setzt UpDown.Position
UpDown.Position geändert -> Update von Edit.Text
...
Stacküberlauf

Hatte ich schon mal. Seit dem setze ich sowas nicht mehr im OnChange. In diesem Fall bezweifle ich immer noch, dass solch eine Verknüpfung besteht (UpDown.Associate).

Mfg
FAlter

Medium 29. Mai 2008 15:51

Re: zahl durch ein Zeichen ersetzen ?
 
Ich schnall nur gerade absolut nicht, was das mit deiner ursprünglichen Frage zu tun hat. Eventuell wäre es gut, wenn du demnächst etwas allgemeiner dazu schreibst was du überhaupt erreichen willst, weil deine ersten Lösungsansätze meist schon seltsam sind, und die Beschreibungen des Problems nicht wirklich erkennen lassen, wo du mal hin willst. Dann artet es in deinen Threads nicht immer in seitenlanges Gerate aus, und es wäre nur fair den Helfern gegenüber.


Alle Zeitangaben in WEZ +1. Es ist jetzt 11:46 Uhr.
Seite 3 von 4     123 4      

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