problem mit langen strings

[richard_boderich]

moin

ich will in meinem programm sowas machen.

var
text: ansistring;

text:=' 1000 zeichen string ';

trotzdem bekomme ich immer einen compilerfehler: "stringliterale koennen maximal 255 zeichen enthalten"

weis jemand was ich da falsch mache?

gruß richard

[fkerber]

Hi!

Zitat von hier:
http://groups.google.de/group/borlan...465a2adfa7870e

Zitat:

I think you mean the problem assigning a long string to a variable at
designtime.Just split your string in multiple lines like this:

MyString := 'something very long...' +
'again something long' +
'the end';


This 255 character limitation is not a string limitation, it's only a delphi
editor limitation.

getestet und bestätigt:

Delphi-Quellcode:

text:='123456789012345678901234567890123456789012345678901'+
'23456789012345678901234567890123456789012345678901234' +
'5678901234567890123456789012345678901234567890123456789012345678901'+
'23456789012345678901234567890123456789012345678901234567'+
'89012345678901234567890123456789012345'+
'678901234567890123456789012345678901234567890123456789012'+
'34567890123456789012345678901234567890123456789012345678901'+
'2345678901234567890123456789012345678'+
'90123456789012345678901234567890123456789012345678901234567890'+
'12345678901234567890123456789012345678'+
'9012345678901234567890123456789012345678901234567890123456789012345678901234567890'+
'123456789012345678'+
'90123456789012345678901234567890123456789012345'+
'678901234567890123456789012345678901234567890123456789012345678901'+
'23456789012345678901234567890123456789012345678901234567890'+
'12345678901234567890123456789012345678901234567890';

Ciao Frederic

[richard_boderich]

herzlichen dank

[XzenTorXz]

Wenn ich aber einen string in einer Struktur definieren möchte (test : string[1024]) komm auch ein fehler:
[Fehler] test.pas(33): String-Literale können maximal 255 Elemente besitzen

[Matze]

Zitat von XzenTorXz:

[Fehler] test.pas(33): String-Literale können maximal 255 Elemente besitzen

Eben darum muss man lange Strings zusammensetzen, wie Frederic es gezeigt hat.

[mkinzler]

Zitat von XzenTorXz:

Wenn ich aber einen string in einer Struktur definieren möchte (test : string[1024]) komm auch ein fehler:
[Fehler] test.pas(33): String-Literale können maximal 255 Elemente besitzen

Nimm AnsiString.
Hast du den Standardstring auf ShortString eingestellt? Welche Delphiversion?

[arbu man]

Das kann man meines wissens nicht umgehen.

Aber kann einen eigenen type machen:

Delphi-Quellcode:

type
  LongString = record
    Len: integer;
    Content: array[1..1024] of char; // 1 KB
  end;

function strtolstr(s: string): LongString;
var
  i: byte;
begin
  result.Len:= length(s);
  for i:=1 to result.Len do begin
    result.Content[i]:=s[i];
  end;
end;

function lstrtostr(s: LongString): string;
  var
  i: integer;
begin
  for i:=1 to s.Len do begin
    result:= result + s.Content[i] ;
  end;
end;