Thanks Bryan,
-> No need for shareware ... WinExecAndWait was posted here by Viggo
-> Poulsen on Nov. 23 '95.
Neil J. Rubenking has a simple program in Delphi for Dummies, page 332.
Place an edit box and a button on a form. Use these lines for the
button's OnClick event handler:
VAR Command : string;
begin
Command := Edit1.Text + #0;
IF WinExec(@Command[1], SW_SHOWNORMAL) < 32 THEN
MessageDlg('Failed to execute ' + Edit1.text,
mtError, [mbOK], 0);
end;
Cheers, Ray.
---
þ RM 1.31 0810 þ * There will be a rain dance Friday, weather permitting...
--- FLAME v1.1
(1:3603/570)
---------------
* Origin: Tampa Bay Computer Society BBS (813) 733-8693 V.34/V.FC
|