hi
 I may be missing the point but why not

unit1
blah
blah
uses main

blah
blah

main.ProgressBar1.Position := whatever;

main is a pointer to the main form all you need?

(I am told its not exactly a pointer but it looks like a pointer,
smells like a pointer and walkes like a pointer.  So!)
bob pointon



>>> [EMAIL PROTECTED] 15/03/2005 19:13:58 >>>
Obviously I was not so clear on my goals.
Here's an attempt to provide an example, stripped of all non-essential
details.  Hopefully I present it correctly.
I have a 'main' unit (Main.pas) with a form.  On the form is
ProgressBar1 (a TProgressBar component)
I have a 'uses' unit (Unit1.pas) that does processing and the goal is
to show the progress of this processing by updating the ProgressBar on
the main form.

(1) Type PProgressBar = ^TProgressBar ;  //Declare pointer type
(2)  Var  ProgressBar1Ptr : PProgressBar ;  //Declare pointer variable
(3)  ProgressBar1Ptr := PProgressBar(ProgressBar1) ;  //Assign value to
pointer
(4)  TProgressBar(ProgressBarPtr).Position := CalculatedBarPosition ;

Line 1 and 2 are visible to both Main and Unit1.
Line 3 is executed in Main to set the value to the pointer.
Line 4 is executed in Unit1 is update the position of the progress
bar.

Again, thanks in advance for your attention and any hints,
Gerry B.

_______________________________________________
Delphi mailing list -> [email protected] 
http://www.elists.org/mailman/listinfo/delphi

_______________________________________________
Delphi mailing list -> [email protected]
http://www.elists.org/mailman/listinfo/delphi

Reply via email to