Forum: Object-Pascal / Delphi-Language
Delphi
by himitsu,
26. Apr 2011
VarIsNumeric...
Ja, wie der Name schon sagt ... einfach prüfen, ob im Variant ein nummerischer Wert drin steckt :zwinker:
Result := TryStrToFloat(String(AValue));
// aber TryStrToFloat kennt dein Delphi wohl nicht
var
E: Integer;
Forum: Object-Pascal / Delphi-Language
Delphi
by himitsu,
26. Apr 2011
Wenn es VarToWideStr nicht gibt, dann wird vermutlich auch VarToWideStrDef nicht vorhanden sein.
Eventuell liegen die im D5 auch nur woanders.
procedure TlkJSONstring.SetValue(const AValue: Variant);
begin
FValue := AValue; // Delphi sollte das auch automatisch umwandeln können
end;
Forum: Object-Pascal / Delphi-Language
Delphi
by himitsu,
26. Apr 2011
Das macht aus einem Variant einen WideString.
Sollte sich durch eine einfache Zuweisung ersetzen lassen.
S := V; (jenachdem wie der Aufruf genau aussieht, da ich die Codestelle jetzt nicht direkt kenn)
Forum: Object-Pascal / Delphi-Language
Delphi
by himitsu,
26. Apr 2011
Gut, Anfangs hat mich das alles in einem Fenster auch gestört ... jetzt hab ich mich dran gewöhnt. :angle2:
OK, wenn ich jetzt erwähne, daß man in ganz neuen Delphi-Versionen wieder alles in Einzelfenster zerlegen kann, dann hilft es dir nicht wirklich was. :lol:
OK, also DupeString hängt x mal den angegebenen String aneinander.
DupeString('abc', 5) liefert also 'abcabcabcabcabc' zurück.
Forum: Object-Pascal / Delphi-Language
Delphi
by himitsu,
26. Apr 2011
{$IFDEF ja, aber nicht die ConditionalExpressions ala {$IF (die gab es, blaub ich, erst seit D6 oder D7)
Forum: Object-Pascal / Delphi-Language
Delphi
by himitsu,
26. Apr 2011
Nja, für DupeString gibt es im Forum irgendwo ein paar Ersatzfunktionen und auch sonst kann man Vieles ersetzen/nachbauen.
Im Notfall können wir ja bei einigen Funktionen aushelfen.
DupeString macht ja nun auch nicht grade was sehr Schweres ... ene String-Variable, eine For-Schleife und schon hat man alles zusammen.
Bei soeinem "alten" Delphi wird man leider damit leben ,üssen, daß man...