| T O P I C R E V I E W |
| wesleybobato |
Posted - Jan 09 2013 : 06:56:35
hello nigel follows a code for you to put in procedure
FillFromDirectory ();
var
j : integer;
begin
for j:=0 to 9999999 do
begin
Label1.Caption := IntToStr(j) ;
{.... loop main body here ...}
Application.ProcessMessages;
{ESC key stops the loop}
if GetKeyState(VK_Escape) AND 128 = 128 then break;
end;
end;
http://delphi.about.com/cs/adptips2000/a/bltip0700_5.htm
will be available when that'll be the next version, with full printing as the printing wizard windows? when you create a beta, please send me to test, because we really need it here at work, a big hug.
|
| 1 L A T E S T R E P L I E S (Newest First) |
| xequte |
Posted - Jan 09 2013 : 12:25:22
Thanks for the tip regarding cancelling, though we will probably handle it via Aborting := true; So that the programmer can enable the feature if they need it.
Nigel
Xequte Software
www.xequte.com
nigel@xequte.com
|
|
|
Search
