Mausklick auf einen geteilten button auslösen.

[gibb]

Hi,

Ich hab folgendes Problem. Da meine zwei anderen themen nicht gefruchtet haben und ich leider immer noch keine lösung für mein problem habe resp. nur eine teillösung versuche ich etwas neues und stehe gleich wieder vor einem Problem.

Speedfan hat ja die felder mit den Fanspeeds (unterer roter kreis), Daneben gleich zwei buttons die auch einzeln reagieren. einmal hoch und einmal runter.
http://gallery.weyland.be/d/4233-1/speedfan1b.jpg

Jetzt ist mein plan mit sendmessega einen neuen wert in das Feld zu schreiben und anschliessend einmal den hoch pfeil und einmal den runterpfeil zu betätigen damit speedfan realisiert das sich der wert geänder hatte. Das Changeevent auszulösen reicht leider nicht. Und tastatureingaben verursachen probleme mit ctrl/Shift und '^'.

Problem:
[img=http://www.abload.de/thumb/winspy6a4u.png]

Die Buttons sind vom handle her nur ein Button, wie mache ich also einen klick in den Button spezifischen teil? also oben links oder unten rechts?

Der code der winspy generiert:

Delphi-Quellcode:

var
  wndMain, wndChild: HWND;
begin
  wndMain := FindWindow('TForm1','SpeedFan 4.37');
  if wndMain <> 0 then
  begin
    wndChild := FindWindowEx(wndMain, 0, 'TPageControl', nil);
    wndChild := FindWindowEx2(wndChild,'TTabSheet', 5);
    wndChild := FindWindowEx2(wndChild,'TRxSpinEdit', 6);
    wndChild := FindWindowEx(wndChild, 0, 'TWinControl', nil);
    if wndChild <> 0 then
    begin
      ShowMessage('Window Handle: ' + IntToStr(wndChild));
      FlashControl(wndChild); // internal function
    end;
  end;

Gruss gibb