x-kom hosting

Aplikacja otwierająca aplikacje ;)

Mateo93
utworzono
utworzono

Witam, oto kod baaardzo prostej przeglądarki grafiki napisanej w Delphi

unit MainFrm;interfaceuses  Forms, Dialogs, ExtDlgs, Classes;type  TMainForm = class(TForm)	OpenPictureDialog: TOpenPictureDialog;	procedure FileOpenClick(Sender: TObject);  private  public  end;var  MainForm: TMainForm;implementationuses ChildFrm;{$R *.DFM}procedure TMainForm.FileOpenClick(Sender: TObject);begin  if OpenPictureDialog.Execute then  begin	ChildForm := TChildForm.Create(Self);	ChildForm.Image.Picture.LoadFromFile(OpenPictureDialog.FileName);	with ChildForm do   end;end;end.

Chce ja przerobić żeby zamiast obrazków otwierała inne proste programy. Jeśli jest to możliwe to proszę o podpowiedzi i kody źródłowe, wiem ze na pewno OpenPictureDialog trzeba zamienic na OpenDialog :)

jacek84
komentarz
komentarz

Jeśli chcesz otworzyć inną aplikacje musisz użyć funkcji WinExec() lub ShellExecute()

Wciąż szukasz rozwiązania problemu? Napisz teraz na forum!

Możesz zadać pytanie bez konieczności rejestracji - wystarczy, że wypełnisz formularz.

×
×
  • Dodaj nową pozycję...

Powiadomienie o plikach cookie

Strona wykorzystuje pliki cookies w celu prawidłowego świadczenia usług i wygody użytkowników. Warunki przechowywania i dostępu do plików cookies możesz zmienić w ustawieniach przeglądarki.