Entwickler-Ecke
Grafische Benutzeroberflächen (VCL & FireMonkey) - Transparenz nach TrackBar
der_zaehe - Mi 09.02.05 13:48
Titel: Transparenz nach TrackBar
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
der_zaehe - Mi 09.02.05 13:54
so, mein prob hat sich gelöst, indem ich statt Form1.AlphaBlendValue := HI(TrackBarAlpha.Position); einfach AlphaBlendValue := TrackBarAlpha.Position; geschrieben hab,
Hab aber trotz allem nicht verstanden, warum das eine nen fehler gibt und das andere nicht.
Kann mir das jemand erklären?
Entwickler-Ecke.de based on phpBB
Copyright 2002 - 2011 by Tino Teuber, Copyright 2011 - 2025 by Christian Stelzmann Alle Rechte vorbehalten.
Alle Beiträge stammen von dritten Personen und dürfen geltendes Recht nicht verletzen.
Entwickler-Ecke und die zugehörigen Webseiten distanzieren sich ausdrücklich von Fremdinhalten jeglicher Art!