-
Как можно предолеть несовместимость PChar и String?
Например:
var f:string; g:pchar;
...
f:=g;
Как пименить такого типа конструкцию? -
cyborg © (15.02.05 19:57) [1]SetLength(F,Length(g));
Move(F[1],G^,Length(G); -
Только так:
type
TConverter = class
P: pchar;
S: string;
procedure P2S;
procedure S2P;
end;
procedure TConverter.P2S;
begin
P:=pchar(s);
end;
procedure TConverter.S2P;
begin
S:=string(P);
end;
...
var
Converter: TConverter;
...
Converter:=TConverter.Create;
Converter.S:=...
Converter.S2P;
...:=Converter.P; -
Anatoly Podgoretsky © (15.02.05 22:11) [3]Конструкция написана правильно, ничего пиметь не надо.
-
Ivan Shikhalev (16.02.05 14:01) [4]mb {$LONGSTRINGS ON} поможет отцу русской демократии?