Einzelnen Beitrag anzeigen

Michelle

Registriert seit: 18. Dez 2010
21 Beiträge
 
Delphi 7 Professional
 
#4

AW: String in Formel umwandeln

  Alt 1. Jun 2011, 15:54
Hallihallo!

Wenn du genau die Form kennst, in der die Formel angegeben ist, kannst du es machen. Wenn also zum Beispiel weißt, dass der Benutzer die Formel IMMER in der Form: 'y:=x^N+B'angibt, funktioniert es:

Code:
var S : String; N,i: Integer; B: Real;
begin
  S := Edit1.text;
  N := StrToInt(S[6]);        //der 6. Buchstabe im String
  B := '';
  for i := 7 to Count(S) do   // damit B < 9 möglich ist: der 7. bis letze Buchstabe
    B := B + StrToReal(S[i]);
end;
Der Nachteil: sobald der Benutzer auch nur ein Leerzeichen zu viel setzt, funktioniert das alles schon nicht mehr.
Alternative: Mach verschiedene Edit-Felder, in denen du die einzelnen Werte reinschreiben lassen kannst.

Liebe Grüße!
Idee := Brain.Activate(self);
  Mit Zitat antworten Zitat