Pchar Rückgabe

[berbog]

Hallo

Ich Möchte euch allen danken
Die Idee mit dem Decimalseparator war goldrichtig
hier mein Code

analog1:=strAlloc(20);
decimalseparator:='.';

label11.Caption:= 'rückgabe TextToFloat '+ inttostr(typ);

label3.caption := 'Fehler ' + inttostr ((ND_Readchanai(1,1,0,analog1)));// Dll Funktion analog1 wird ausgelesen und ergebnis angezeigt
label4.caption := 'Messwert' +(analog1); //wird richtig als +0029 ausgegeben
label5.Caption := 'Stringlänge ' + inttostr (strlen(analog1));
label6.caption := 'Neuer Wert ' +(floattostr(strtofloat(analog1)));


series1.Addy((strtofloat(analog1)));
Allerdings muss ich den Decimalseparator noch zurücksetzen

Gruss Bernd