visual basicia lievästi opetelleena haluaisin tehdä sovelluksen, jossa olisi muutama command button, joista voisi käynnistää sovelluksia.
ja sitten vielä, miten siihen nappiin saisi sen ohjelman kuvakkeen, Picture -kohdasta se meni taustalle.
jos ohjelman antaa kaverille, pitää ilmeisesti ohjelman sovellukset olla mukana paketissa?
ja sitten vielä, miten siihen nappiin saisi sen ohjelman kuvakkeen, Picture -kohdasta se meni taustalle.
jos ohjelman antaa kaverille, pitää ilmeisesti ohjelman sovellukset olla mukana paketissa?
Vastaukset 3
Vanhimmat
Ä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).
aloin ajattelemaan asiaa liian monimutkaisesti.
pitääpä kokeilla huomenissa
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!