[Logrim]

One little question, please help me in you can

i have a botva2 button, this:

InstallGame1Btn:=BtnCreate(WizardForm.Handle,55,84 ,15,15,'AutorunMainBtn.png',0,False);
BtnSetEvent(InstallGame1Btn,BtnClickEventID,CallBa ckAddr('InstallGame1BtnClick'));
BtnSetEvent(InstallGame1Btn,BtnMouseEnterEventID,C allBackAddr('BtnEnter'));
BtnSetCursor(InstallGame1Btn,GetSysCursorHandle(32 649));

and i have a label for that button. i want to have the same setbounds in the label that the button, but, and this is the problem, i want if i have to positioning the button in another point of the autorun, move the label at the same position automatly.. i hope you understand my problem.

I want something like this, but with button not work.
SetBounds((InstallGame1Btn.Left + InstallGame1Btn.Width) + 10,0,0,0);

This is the label:

InstallGame1Label:=TLabel.Create(WizardForm);
InstallGame1Label.Parent:=WizardForm;
InstallGame1Label.SetBounds(75,84,0,0);
InstallGame1Label.Font.Name:='Verdana';
InstallGame1Label.Font.Style:=[fsBold];
InstallGame1Label.Font.Color:=$C0C0C0; //Light Gray;
InstallGame1Label.Font.Size:=9;
InstallGame1Label.Caption:=ExpandConstant('{#Game1 Name}');
InstallGame1Label.OnMouseDown:=@WFMouseDown;
InstallGame1LabelS:=TLabel.Create(WizardForm);
with InstallGame1LabelS do begin
Parent:=WizardForm;
SetBounds(75+1,84+1,0,0);
Font.Name:='Verdana';
Font.Style:=[fsBold];
Font.Color:=clBlack;
Font.Size:=9;
SendToBack;
Caption:=ExpandConstant('{#Game1Name}');
OnMouseDown:=@WFMouseDown;
end;

Thanks

Edit: anyone know how to make a label color semitransparent?