Inkompatible Typen TCaption und PAnsiChar???

[mlspider]

Hallöchen,

folgender Schnipsel paßt meinen Compiler nicht so richtig:

Delphi-Quellcode:

procedure TForm1.Button1Click(Sender: TObject);
var
  cDownStatus : cDownloadStatusCallback;
begin
 cDownStatus := cDownloadStatusCallBack.Create;
  try
   URLDownloadToFIle(nil,Edit1.Text,Edit2.Text,0,CDownStatus);
  finally
    cDownStatus.Free;
  end;
end;

TCaption und PAnsiChar müßten meiner bescheidenen Meinung nach völlig kompatibel sein. Oder liege ich hier falsch?

[Matze]

Sonst einfach mittels

Delphi-Quellcode:

PChar('string')

umwandeln

[mlspider]

Ich will aber eine Eingabe über Edit ermöglichen. Also kein festen String.

[Matze]

Delphi-Quellcode:

PChar(Edit1.Text);

Geht das so nicht?

[mlspider]

nein, leider nicht. Habe es schon probiert.

[Edit]Sorry, hatte die Klammer vergessen. Meine eigene Blödheit!!![Edit-Ende]

Delphi-Quellcode:

URLDownloadToFIle(nil,PChar(Edit1.Text),PChar(Edit2.Text),0,CDownStatus)

[MathiasSimmack]

Natürlich geht das so. Sorry, wenn ich mich reinhänge, aber ich tippe auf einen Tipp- oder Schusselfehler in deinem Programm, Mario. Das Typecasting

Delphi-Quellcode:

pchar(Edit1.Text)

funktioniert zu 99% immer.

[Matze]

Zitat:

Zitat von mlspider

nein, leider nicht. Habe es schon probiert.

Soll ich dir das glauben?

Delphi-Quellcode:

URLDownloadToFIle(nil, PChar(Edit1.Text), PChar(Edit2.Text), 0, nil);

geht einweandfrei.

[mlspider]

Habe meinen Senf nochmals editiert. Natürlich läuft es so.

[himitsu]

Zitat:

Zitat von mlspider

TCaption und PAnsiChar müßten meiner bescheidenen Meinung nach völlig kompatibel sein. Oder liege ich hier falsch?

Du hast 'ne Enterprise-Version, also liegt bei dir der SourceCode rum ... schau doch in soeinem Fall infach mal nach, wie TCaption definiert ist :zwinker:

[Binärbaum]

Zitat:

Zitat von himitsu

schau doch in soeinem Fall infach mal nach, wie TCaption definiert ist :zwinker:

IMHO ist TCaption ein einfacher string oder WideString:

Delphi-Quellcode:

type TCaption = String;
//oder
type TCaption = type WideString;

MfG
Binärbaum