Extended Problem

[CT86]

Hey Leute,
ich habe ein Problem. Und zwar, wie kann ich das Format Extended in einen String konvertieren um ihn dann in einem StrigGrid anzeigen zu lassen :?: Ich habe irgenwie keine sinnvolle Lösung dazu :wall: :wall:
Ok, hoffentlich gibt es jemand der mir helfen kann :)
mfg
CT86

[Steve]

Str(Zahl:Stellen:Dezimalstellen,BufferString);

Als Dezimaltrenner wird bei Str aber immer der Punkt benutzt...

Ohne die "Rundung" und mit dem Dezimaltrenner der Systemeinstellung arbeitet "FloatToStr" :zwinker:

Gruß
Stephan

[s14]

Hallo,
schon "FloatToStr" probiert :stupid:

Gruß
s14

[CT86]

Hab ich jetzt mal ausprobiert. Aber dann bekomme ich eine Fehlermeldung Extended Variable nicht initialisiert wäre! Kann damit jemand was anfagen?
Ich habe es jeweils so ausprobiert:

(x: Extended; c: String;)

Str(x:6:2, c);

und so

c := FloatToStr(x);

[mytar]

Ich glaube es gibt auch TryFloatToStr!

[Luckie]

Und noch eine Möglichkeit, wahrscheinlich die flexibelste: Fromat.

[CT86]

Hey Toxman, hier ist die Procedure, ich will ddie Ergebniss in einem StringGrid anzeigen und nicht in einem Memo. Und dahin kommt noch dazu, dass die x-Werte zur Laufzeit eingegeben werden sollten/können nicht müssen. Also wäre es doch gut wenn das ganze dann in einer Schleife stehen würde, Oder :gruebel: :?:

Delphi-Quellcode:

procedure TForm1.Button1Click(Sender: TObject);
     var x,y: extended;
       term: string;
begin
   term := edit1.text;
// Das ist unwichtig!!!
//   memo1.text := 'x      f(x)';
//   memo1.Font.Name := 'Courier New';
   x := -5;
   repeat
     y := termToReal(term,x);
     memo1.lines.Add(formatfloat(' 0.0   ;-0.0   ', x) + formatfloat('0.###',y));
     x := x + 1/2;
   until x > 5; 
end;

:wall:

mfg
CT86

[Luckie]

Delphi-Quellcode:

StringGrid1.Cells[x,y] := 'Mein Text';

[mytar]

Delphi-Quellcode:

StringGrid1.Cells[ACol, ARow] := FormatFloat(' 0.0   ;-0.0   ', x) + FormatFloat('0.###',y));

[fkerber]

Hi!

Zitat:

Zitat von CT86

Meine Frage, wie bekomme ich di ausgabe in ein StringGrid anstatt in ein Memo?? :wiejetzt:

Hat sich die Ursprungsfrage erledigt, oder geht die Umwandlung noch nicht?
Wegen dem oben zitierten erstellst du am besten einen neuen Thread, dann geht es nicht so durcheinander :wink:

Ciao Frederic