Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by AlexII,
17. Okt 2015
In der Form natürlich. :-D
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by AlexII,
16. Okt 2015
Das sind sie, habe nur den Name geändert und überall angepasst, daran liegt es nicht. ))
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by AlexII,
16. Okt 2015
Eigentlich nichts besonderes...
procedure TMainForm.VolumeOffImageClick(Sender: TObject);
begin
vol := TrackBar1.Position;
BASS_ChannelSetAttribute(chan, BASS_ATTRIB_VOL, 0);
VolumeOffImage.Visible := False;
VolumeOnImage.Visible := True;
TrackBar1.Position := 0;
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by AlexII,
16. Okt 2015
KeyPreview ist bei mir bereits auf True gesetzt.
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by AlexII,
16. Okt 2015
Wow... es klappt. Nun möchte ich die Lautstärke mir dem "j"-Buchstaben ein/ausschalten... und hier funktioniert es nicht... die Lautstärke wird zwar ein/ausgeschaltet, aber auch in der ListBox wird zum Eintrag gesprungen, der mit "j" anfängt.
// Lautstärke ein/ausschalten mit dem 'j'-Buchstaben
if Key = 74 then
begin
if VolumeOn.Visible then
begin
...
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by AlexII,
16. Okt 2015
Hallo,
ich regele wie folgt die Lautstärke in meinem Programm:
// Lautstärke mit Pfeiltasten regeln
if (Key = VK_LEFT) then
TrackBar1.Position := TrackBar1.Position - 1
else if (Key = VK_RIGHT) then
TrackBar1.Position := TrackBar1.Position + 1;