نقل قول نوشته شده توسط arkia مشاهده تاپیک
سلام به دوستان برنامه نويس ، ميخواستم بدونم چجوري ميشه يک مقدار string رو به pansi تبديل کنم.
با تشکر قبلي









var   path:PAnsiChar;



str= ' c:\My Folder'

path:=کد تبديل

ShellExecute(hwnd(nil),'',path,'','',SW_MAXIMIZE);

این پست خیلی قدیمی است قطعا شما به جواب رسیدید برای کسانی که این مشکل رو دارن جواب دادم

PAnsiChar یک اشاره گر به AnsiChar هست
به نمونه زیر دقت کنید گره کارتونو باز میکنه




uses

ShellApi



....





procedure TForm1.Button1Click(Sender: TObject);

var

VPAnsiChar:PAnsiChar;

VStr:string;

begin

VStr:= 'cmd /c "ping ' + Edit1.text + '"';

VPAnsiChar := PAnsiChar(AnsiString(VStr));

WinExec(VPAnsiChar, SW_SHOW);

end;