Slider1 (sowas wie TrackBar) MAX wert ändern?

[Pseudemys Nelsoni]

hoi,

wie ihr ja sicher wisst gibt es die komponente "TrackBar" diese hat den Wert "MAX", nun hab ich in einem Spiel as Handle des Fensters usw ausgelesen, in diesem fenster ist auch die komponente "Slider1" (delphi hat die nicht, funktioniert aber genau wie die TrackBar). Wie ändere ich den wert "Max" von dieser komponente per api per sendmessage?

das wurde von toms tool WinSpy ausgelesen:

Zitat:

ClassName: "msctls_trackbar32" | Caption: "Slider1" | Handle: 197384

würde es mit "TBM_SETRANGEMAX" gehen?

[Pseudemys Nelsoni]

*hochschieb*


wie ich aus einem anderen thread schon gelesen habe geht das senden an eine TrackBar nicht so leicht. wie geht es dann?

[NicoDE]

SendMessage(Handle, TBM_SETRANGEMAX, True, NewMax);

[Pseudemys Nelsoni]

hi Nico,

das habe ich schon versucht, es tut sich aber nichts, das Maximum bleibt 4. Die handles sind 100% richtig, weil sie grösser als 0 sind und mir showmessage auch angezeigt wird bei der > 0 abfrage.

Code:

procedure TForm1.Button1Click(Sender: TObject); 
var 
  h1, h2, h3: hwnd; 
begin 
  h1 := FindWindow('Tiberian Sun', 'Tiberian Sun'); 
  h2 := FindWindowEx(h1, 0, '#32770', ''); 
  h3 := FindWindowEx(h2, 0, 'msctls_trackbar32', 'Slider1'); 
  if h3 > 0 then SendMessage(h3, TBM_SETRANGEMAX, 1, 100); 
end;

^^^^das geht nicht. Ändert sich nicht von 4 auf 100.

[Pseudemys Nelsoni]

*wenn ichs nochmal hochschieben darf*. Es muss doch gehen

[NicoDE]

Zitat von Pseudemys Nelsoni:

Es muss doch gehen

Mag sein, aber Ferndiagnose ist relativ schwierig
Ich gehe einfach mal davon aus, dass entweder das Programm es immer wieder neu setzt, oder das Control (trotz des richtgen Klassennamens) nicht auf die Nachricht reagiert, da es möglichweise gekapselt wurde...
...da ich das Programm nicht testen kann, kann ich da nur mutmaßen.

[Pseudemys Nelsoni]

es gibt ja einen patch der genau dieses kann, nun wollte ich ihn für mich nachmachen

[NicoDE]

Zitat von Pseudemys Nelsoni:

es gibt ja einen patch der genau dieses kann, nun wollte ich ihn für mich nachmachen

Derjenige - der den Patch erstellt hat - wird sicher mehr wissen...

[Pseudemys Nelsoni]

jo, aber den kann ich nicht fragen, wel ich den nicht auffinde :'(