Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by delphin,
11. Dez 2006
Hallo,
besten Dank. Habe noch eine Möglichkeit im OnChange-Ereignis gefunden:
Geht offensichtlich auch so:
procedure TForm1.ScrollBar1Change(Sender: TObject);
begin if Scrollbar1.Position > 50 then ScrollBar1.Position:=50
end;
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by delphin,
11. Dez 2006
Hallo marabu,
Danke für Deine Antwort. Für eine Textbox magst Du ja recht haben, wobei ich trotzdem der Meinung bin, wenn ich schon 50% von 100% sehe brauche ich auch nur noch die restlichen 50% nach unten scrollen.
Nun aber zu Deinen Lösungvorschlag: abfangen im OnScroll-Ereignis:
Hatte ich schon probiert und so ging es nicht:
procedure TForm1.ScrollBar1Scroll(Sender: TObject;...
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by delphin,
10. Dez 2006
Hallo Leute,
hat den niemand das beschriebene Problem nachvollzogen??? Bin immernoch auf der Suche nach des Rätesels Lösung und brauchte mal einen kompetenten Rat von Euch.
Für eine Antwort wäre ich sehr dankbar.
Vielleicht kennt ja auch jemand eine Möglichkeit, wie man das OnScroll-Ereignis abfängt, um selbst Hand an zulegen.
Gruß Gerd
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by delphin,
9. Dez 2006
Hallo,
ich frage mich schon seit Tagen, wo mein Denkfehler liegt. Vielleicht kann mir jemannd weiterhelfen.
Ich habe einen eigenen Scrollbalken erzeugt, der mir von einem vorhanden Bild den betreffenden Ausschnitt proportional anzeigen und beim Klicken mit Hilfe einer Scrollbox verschieben soll.
z.B.: gesamtes Bild = 100 Pixel, sichtbarer Ausschnitt = 50 Pixel
ergibt sich doch: