Конференция "FreePascal" » несовместимость PChar и String [Win32]
 
  • hotes © (15.02.05 16:25) [0]
    Как можно предолеть несовместимость 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);
  • DrPass © (15.02.05 22:08) [2]
    Только так:

    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} поможет отцу русской демократии?
 
Конференция "FreePascal" » несовместимость PChar и String [Win32]
Есть новые Нет новых   [119264   +48][b:0][p:0.001]