ShellExecute fonksiyonunda hata

[varyemez]

s.a. arkadaşlar , bu ifadeyi

ShellExecute(Handle,'open',PChar('BKBAS.exe'),nil,Pchar(ExtractFilePath(Application.ExeName)),SW_SHOWNORMAL); şeklinde yazarsak çalışıyor.. ama ben komutun önüne parametre eklemek istiyorum , alttaki yazılımda çalışmıyor delphi XE kullanıyorum

Kod: Tümünü seç

begin
 p:='BKBAS.exe ';
 b:=labelededit1.Text;
 ShellExecute(Handle,'open',PChar(Format('%s %s',[p,b])),nil,Pchar(ExtractFilePath(Application.ExeName)),SW_SHOWNORMAL);

Mutlu , sağlıklı yıllar dilerim

[sabanakman]

Kod: Tümünü seç

ShellExecute(Handle, 'open', 'BKBAS.exe', PChar(labelededit1.Text), Pchar(ExtractFilePath(Application.ExeName)), SW_SHOWNORMAL);

[varyemez]

Çok teşekkür ederim.. hiç bozmadan kopyalayıverdim , çalıştı.