Hallo,
ich bin am verzweifeln:
Warum funktioniert dies:
Delphi-Quellcode:
procedure TForm1.Button1Click(Sender: TObject);
var
x,y :PAnsiChar;
begin
x:=PAnsiChar(Edit1.Text);
// showmessage(IntToStr(length(x)));
Label1.Caption:=String(x);
BinToHex(x,y,5);
showmessage(IntToStr(length(y)));
Label1.Caption:=Copy(String(y),1,length(Edit1.Text)*2);
end;
aber das nicht:
Delphi-Quellcode:
procedure TForm1.Button1Click(Sender: TObject);
var
x,y :PAnsiChar;
begin
x:=PAnsiChar(Edit1.Text);
showmessage(IntToStr(length(x)));
Label1.Caption:=String(x);
BinToHex(x,y,5);
showmessage(IntToStr(length(y)));
Label1.Caption:=Copy(String(y),1,length(Edit1.Text)*2);
end;
In Edit gebe ich 'abcde' ein
Im zweiten Fall Fehlermeldung: Zugriffsverletzung bei Adresse ... im Modul ...
Ich versteh's einfach nicht.