Memo scrollen

[DeddyH]

Und ohne das with? Nicht, dass Delphi hier durcheinander gerät. Delphi 7 kann ich erst heute Abend ausprobieren, da ich das nur zu Hause installiert habe.

[Nicodius]

Leider auch nicht, würde mich freuen wenn du das bei dir probieren könntest.

hab jetzt testweise es aus der Onclick von meiner Listbox rausgenommen und probiert ob ich per button in eine gewisse zeile komme, aber auch das funktioniert nicht. Es stimmt also entweder der code nicht den ich verwende oder irgendwas wird da ordentlich durcheinander gehaun.

[Nicodius]

in der Tat mit meinem testprogramm hat es geklappt.
dann muss ich wohl weiter fehler suchen, aber ich habe wirklich keine ahnung was da bei mir reinfunkt, es sollte nach den Zeilen

Delphi-Quellcode:

    
    SelStart := Perform(EM_LINEINDEX, StrToInt(scroll_input.text), 0);
    Perform(EM_SCROLLCARET, 0, 0);
    Invalidate;

kein code mehr ausgeführt werden der irgendwas verändern kann.

[Nicodius]

ok interessante sache:

Delphi-Quellcode:

      
  Log_Form.Caption := SysErrorMessage(GetLastError());
  SelStart := Error_codes.ItemIndex;
  Perform(EM_SCROLLCARET, 0, 0);
  invalidate;

gibt operation completed successfully aus

Delphi-Quellcode:

      
  SelStart := Error_codes.ItemIndex;
  Log_Form.Caption := SysErrorMessage(GetLastError());
  Perform(EM_SCROLLCARET, 0, 0);
  invalidate;

gibt den error "Access denied" aus. Woran könnte das liegen? im onselection change wird nichts geändert.

lg