Forum: GUI-Design mit VCL / FireMonkey / Common Controls
by axmarq,
27. Jul 2007
Danke, das war ja einfach. Ich habe ewig rumgesucht und mich gefragt warum das nicht funktioniert.
Also, nochmal besten Dank.
axmarq
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
by axmarq,
27. Jul 2007
Hallo,
ich habe ein Problem mit der TScrollbar Komponente. Ich habe ein Memo mit 7 Zeilen Anzeigengröße. Der Text, der geladen wird, ist aber 18 Zeilen groß. Folgenden Code habe ich nun für das Scrollbar-OnChange-Ereignis hinterlegt:
procedure TForm1.ScrollBar1Change(Sender: TObject);
var s1, i: integer;
begin
s1 := 0;
for i := 0 to ScrollBar1.Position-1 do
s1 := s1 +...