Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by needatip,
22. Feb 2007
:thumb:
Saubere Lösung, echt klasse !
Problem ist gelöst.
Danke.
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by needatip,
22. Feb 2007
Ich wollte noch ergänzen nur Kleinbuchstaben !!!
In der Art .. if c in then ..
oder so ähnlich.
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by needatip,
22. Feb 2007
Danke, funktioniert schon ganz gut, hab nur die Schreibfehler ausgesbessert.
procedure TForm1.Button1Click(Sender: TObject);
var i : integer;
c : Char;
s : string;
begin
s := Edit1.Text;
if StrToIntDef(RightStr(s,1),99) = 99 then
begin
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by needatip,
22. Feb 2007
Hallo,
ich hab einen beliebeigen String aus einer Zahl und einem möglichen nachgestelltem Buchstaben, der jeweils in eine Zahl und dem einzelnen nachfolgenden Zeichen zerlegt werden soll. Das letzte Zeichen im String ist nicht immer vorhanden. d.h. dann steht eben nur eine Zahl im String.
Beispiele:
'123a' ERGEBNIS: Zahl 123 aus String filtern und jeweils den Zahlenteil in eine...