Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Sonstige Fragen zu Delphi (https://www.delphipraxis.net/19-sonstige-fragen-zu-delphi/)
-   -   Delphi punkte auslesen (https://www.delphipraxis.net/133298-punkte-auslesen.html)

Surge0n 29. Apr 2009 12:43


punkte auslesen
 
hi ich habe ein kleines problem:
mein programm speichert einen punkt sen ich festlege ich eine combobox (z.B. steht dann ich der combobox "12,45" wobei 12 x ist und 45 y)
nun möchte ich gern nur x auslesen das heißt die zahl vor dem komma...wie mahce ich das ...bis jetzt hab ichs nur geschafft die anzahl der stellen vor dem komma anzugeben...:
hier meine Funktion:
Delphi-Quellcode:
function tform1.xfind:integer;
 begin
 for anz:=1 to length(combobox1.Text) do begin
                                          if combobox1.Text[anz]=',' then stellex:=anz-1;
                                         end;
 result:=stellex;
 end;
danke im voraus

mkinzler 29. Apr 2009 12:47

Re: punkte auslesen
 
Oder
Delphi-Quellcode:
result := Trunc( TryStrToFloat( ComboBox1.Text, 0));

3_of_8 29. Apr 2009 13:13

Re: punkte auslesen
 
Delphi-Quellcode:
var str: String;
begin
  str:=ComboBox1.Text;
  Result:=StrToInt(Copy(str, 1, Pos(',',str)-1));
end;
Deutlich schöner als das ganze zu ner Gleitkommazahl zu verwurschteln. ;)

FabianClassen 29. Apr 2009 13:59

Re: punkte auslesen
 
Ich will jetzt nicht nochmal das gleich posten, aber ich denke, dass es ganz schön nützlich sein kann, wenn du dir folgendes mal anguckst:

http://www.delphi-treff.de/tutorials...gverarbeitung/

Das ist ein kleines Tutorial zur Stringverarbeitung unter Delphi und hilft in vielen ähnlichen Situationen ;)

MFG
FC
;)


Alle Zeitangaben in WEZ +1. Es ist jetzt 00:52 Uhr.

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