Re: open and copy funtions under one button

Posted by john vanderelst on March 10, 2006

In Reply to Re: open and copy funtions under one button posted by Jenny on March 07, 2006

: You can simply combine the code like this:

: procedure TForm1.Button1Click(Sender: TObject);
: begin
: // Code for run action:...
: // ...
: // Code for copy action:...
: // ...
: end;

: Or maybe the other way arond:

: procedure TForm1.Button1Click(Sender: TObject);
: begin
: // Code for copy action:...
: // ...
: // Code for run action:...
: // ...
: end;

: If you code it like this, are you having problems?

Hi Jenny
I have it working. However there was one thing I overlooked. Part two started while the exe file was running still.
Thanks for your help
bye
John


[ DelphiLand FAQ ]