Hallo!
wie krieg ich es hin, das mein sich die Transparenz meines Forms mit einem Trackbar einstellen lässt?
ich hab das mit folgendem code versucht:
Delphi-Quelltext
1:
2:
3:
4:
| procedure TForm1.TrackBarAlphaChange(Sender: TObject);
begin
Form1.AlphaBlendValue := HI(TrackBarAlpha.Position);
end; |
ich krieg dann allerding noch beim starten einen AccesViolaton, allerdings net von meinem hauptform form1, sondern von einem anderen form, form2.
Delphi-Quelltext
1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
14:
15:
| program ZChat;
uses
Forms,
ZChat_unit in 'ZChat_unit.pas' ,
ZChat_unit_privat in 'ZChat_unit_privat.pas' ;
{$R *.res}
begin
Application.Initialize;
Application.CreateForm(TForm1, Form1);
Application.CreateForm(TForm2, Form2); Application.Run;
end. |
was mach ich da falsch?
schon mal danke für eure antworten
