20-01-2009, 06:52 PM
و عليكم السلام و رحمة الله
بالتوفيق ان شاء الله
PHP كود :
procedure TMain.FormCreate(Sender: TObject);
begin
if ParamStr(1) <> '' then
FileNameEdt.Text := ParamStr(1);
end;
بالتوفيق ان شاء الله