sovelluksen käynnistys?

Älä käytä Command buttoneita vaan PictureBoxeja.

Ohjelman käynnistät Shell komennolla, esim. Shell "c:\ohjelma.exe"

Vb:ssä (ostetussa) on mukana setup-paketin teko-ohjelma (se on samassa valikossa kuin vb).

Mulla ei ole kokemusta kuin Delphistä, mutta siinä homma onnistuu tosi hyvin :)

//=============================

!procedure TMainClass.RunAtCommandPrompt(const AExecutable, AParameters, AWorkPath: String);
!var
! SEInfo: TShellExecuteInfo;
! exitCode: DWORD;
!begin
! FillChar( SEInfo, SizeOf(TShellExecuteInfo), $00 );

! SEInfo.cbSize := SizeOf( TShellExecuteInfo );

! with SEInfo do
! begin
! fMask := SEE_MASK_NOCLOSEPROCESS;
! Wnd := Application.Handle;
! lpFile := PChar( AExecutable );
! lpParameters := PChar( AParameters );
! lpDirectory := PChar( AWorkPath );
! nShow := SW_SHOW; //SW_HIDE;
! end;

! // suoritetaan komento/ohjelma
! ShellExecuteEx( @SEInfo );

! // .. odotetaan kunnes on suoritettu!
! repeat
! Application.ProcessMessages();
! GetExitCodeProcess( SEInfo.hProcess, exitCode !);
! until (ExitCode STILL_ACTIVE) or Application.Terminated;
!end;

//============================

!procedure TMainClass.AliOhjelma;
!begin
! RunAtCommandPrompt( 'ohjelma.exe', '-c parametrit', 'C:\' );
!end;

Etu tässä on se, että voidaan käynnistää taustalla jokin sovellus (myös piiloitettuna), esim. jokin Java-sovellus ja jäädä odottamaan, kunnes tämä ulkoinen sovellus on suorittanut toimintonsa ja jatkaa siitä, kun tulos on valmis! :)

Onnistuneen ehkä Visual Basicilla myös, mutta en tunne sen koodia!