Einzelnen Beitrag anzeigen

Doenercola

Registriert seit: 28. Nov 2010
14 Beiträge
 
FreePascal / Lazarus
 
#8

AW: Memo Feld Autoscroll funktioniert nicht

  Alt 20. Feb 2011, 22:58
das Scrollen is aber noch net automatisch.
Wie nicht automatisch?
Dieser Befehl sagt "Scrolle jetzt nach unten" und das auch nur genau jetzt und nicht zukünftig.
Sorry, hab mich etwas ungenau ausgedrückt Ich wollte damit sagen, dass das Memo-Feld, beim Drücken auf einen Button, nicht nach unten scrollt, sondern wieder nach oben.


Delphi-Quellcode:
procedure MemoFeld_NachUnten;
begin
Form1.Memo_Textausgabe.Perform(WM_VSCROLL, SB_BOTTOM, 0);
end;

procedure TForm1.Img_Wpn_2Click(Sender: TObject);
begin
  Waffentyp := 'Schnappschildkröte am Stock';
  Schaden := 25;
  GebeInfo_WaffeBild
  MemoFeld_NachUnten;
end;
Bei der Prozedur "GebeInfoWaffeBild" werden Informationen, beim Klick auf ein Bild (bei einer anderen Prozedur beim Drücken auf einen Button) in dsa Memo Feld geschrieben. Das Memo-Feld geht dann jedoch "nicht mit" sondern geht bei jedem Klick wieder nach oben in die Ausgangsposition.

Ganz liebe Grüße
Marcel.
  Mit Zitat antworten Zitat