FloatToStr();

Aya · Verfasst: Do 28.11.02 18:22

Hi,

wenn ich mit FloatToStr(5.35); die zahl in einen string umwandle bekomme ich als ergebniss ja "5,35" (ein kommer, KEIN Punkt)

Wenn ich das ganze jetzt in Amerika mache auf einem Amerikanischen Windows... liefert es dann "5,35" oder "5.35" als String zurück??? (Compiliert ist es auf einem Deutschen System)

Au'revoir,
Aya~

bis11 · Beiträge: 1247 Erhaltene Danke: 2 Apple Mac OSX 10.11

Hi,

ich schätze, das kommt darauf an, welche Zeichen dafür in der Ländereinstellung eingetragen ist.

tommie-lie · Beiträge: 4373 Ubuntu 7.10 "Gutsy Gibbon"

richtig, bis11.
Am einfachsten (ohne Ländereinstellungen zu ändern) geht's vermutlich, wenn du nach dem Komma suchst (mit Pos) und anschließend das Komma löschst und durch einen Punkt ersetzt.
Ist die Ländereinstellungen bereits Englisch (weil das OS so eingestellt ist oder weiß der Geier warum), so musst du vorher abfragen, ob er das Komma nicht findet (also if KommaImString then Pos usw), weil ich nicht auswendig weiß, was Pos zurückgibt, wenn's das gesuchte Zeichen nicht findet...

_________________
Your computer is designed to become slower and more unreliable over time, so you have to upgrade. But if you'd like some false hope, I can tell you how to defragment your disk. - Dilbert

Ehemaliges Mitglied Erhaltene Danke: 1

Kuck mal in der Hilfe unter DecimalSeparator.

Gast Erhaltene Danke: 1

Sorry Luckie, DecimalSeparator steht nur als Randbemerkung in der Hilfe und kann direkt nicht gefunden werden.

Ich hab ein altes Beispiel in meiner Sammlung:

markieren

Quelltext

1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
14:

procedure TForm1.Button1Click(Sender: TObject);
var
  r: Real;
begin
  r := StrToFloat('12345,67');
  DecimalSeparator := ',';
  ShowMessage(FloatToStr(r));
  DecimalSeparator := '.';
  ShowMessage(FloatToStr(r));
  DecimalSeparator := '#';
  ShowMessage(FloatToStr(r));
  DecimalSeparator := '.';
  ShowMessage(FloatToStr(r));
end;

Ehemaliges Mitglied Erhaltene Danke: 1

Komisch, bei mir nicht. ist sogar ein Beispiel für DateSeparator dabei und eine schöne Erklärung:

Zitat:

The SysUtils unit includes a number of variables that are used by various formatting routines. Values are assigned to these variables to define the formats of numeric and date/time strings.

Aya · Verfasst: Do 28.11.02 20:01

Hi,

also bei mir steht's in der Hilfe auch drin... zusammen mit ner menge andere solcher Variablen

Aber trotzdem danke an alle

*winkt*
Aya

Gast Erhaltene Danke: 1

@Luckie

Ok, kann sein, daß die inzwischen die Hilfe etwas verbessert haben. Ich denke irgendwie immer noch in der Delphi 3 Hilfe. Da steht es lediglich als eine einzige Randbemerkung und ohne ein Beispiel.

Ehemaliges Mitglied Erhaltene Danke: 1

D6 Personal.

	Mitgliederliste
	Gruppen
	Das Team
	Richtlinien
	Synonyme