String > 255, oder anderer Datentyp

[Patrick]

Hallo,

Ich hab folgendes Problem:
Ich brauche einen String ohne Limit.

Also das kann ich vergessen, zu klein

Code:

procedure StrtoTZ(ZString : string; var zahl : TZahl);

Das geht leider auch nicht, er erkennt TCaption nicht

Code:

procedure StrtoTZ(ZString : TCaption; var zahl : TZahl);

Ich rufe die Procedure so auf

Code:

StrtoTZ(Edit1.Text,zahl1);

Edit1.Text ist ja vom Typ TCaption...

[XeRo]

Versuchs mal mit einem AnsiString; :lol:

[Edit]Scheinbar gibt es den longstring nicht :gruebel: woher hab ich das dann?[/Edit]

[Patrick]

Das ganze kann funktionieren, aber ich hab da noch ein anderes Problem

Wenn ich das ganze anders herum mache gibt's diese Fehlermeldung:
"Types of actual and formal var parameters must be identical"

Code:

procedure TZtoStr(var ZString : ansistring; var zahl : TZahl);
...
TZtoStr(Edit3.Text,erg); <-- in dieser Zeile

[Shaman]

Man kann Properties leider nicht als Referenz übergeben :(

[mytar]

Edit1.Text ist sicher kein AnsiString,
und sonst ist erg nicht vom Typ TZahl

vielleicht klappt:

Delphi-Quellcode:

AnsiString(Edit1.Text)

als 1. Parameter.

[XeRo]

An dem asnistring kanns kaum liegen, denn das funktioniert:

Delphi-Quellcode:

procedure TForm1.Button1Click(Sender: TObject);
var
 hallo:AnsiString;
begin
 hallo:=edit1.text;
 caption:=hallo;
end;

ich würd einfach was anderes für TZahl verwenden...


[edit]delphi code anstelle von code genommen[/edit]

[Patrick]

Also ein bissl von jedem klappt...

Der AnsiString ist scheinbar ersteinmal lang genug...

Am "erg" hat's nicht gelegen, das ist genz sicher vom Typ TZahl!

Zitat:

Man kann Properties leider nicht als Referenz übergeben

Ich denke das war's.

Delphi-Quellcode:

procedure StrtoTZ(ZString : string; var zahl : TZahl);

Die Fehlermeldung kahm nämlich schon, als ich hier vor den "ZString" ein var gesetzt habe, nur hier konnte ich es wegmachen, was andersherum (TZtoStr) nicht möglich war, sopnst hätte es nicht funktioniert.

Gelöst habe ich es jetzt einfach mit einer Function, und zwar so:

Delphi-Quellcode:

function TZtoStr(zahl : TZahl):ansistring;
...
Edit3.Text:=TZtoStr(erg);

[Luckie]

Zitat:

Zitat von Patrick

Der AnsiString ist scheinbar ersteinmal lang genug...

Die theoretische Länge von 2 GB sollte auch reichen oder?

[Patrick]

Ich denke, das reicht gerade so :wink:

Aber was ist denn jetzt eigentlich der Unterschied zwischen String und AnsiString???

[scp]

String kann sich von einer Delphi-Version zur anderen ändern, ist also ein sogenannter generischer Typenbezeichner (bzw. funktioniert so). Bei älteren Versionen war String noch identisch zu ShortString, in Delphi 7 sollte er aber zu AnsiString identisch sein, wenn nicht der entsprechende Kompilerschalter gesetzt ist.
Alles nachzulesen in der Delphi-Hilfe unter "String-Typen".