Einzelnen Beitrag anzeigen

Benutzerbild von bitsetter
bitsetter

Registriert seit: 17. Jan 2007
1.169 Beiträge
 
Turbo Delphi für Win32
 
#12

Re: Onclick -Ereignis trotz Enabled-Eigenschaft False??ß

  Alt 20. Dez 2007, 14:37
Zitat von PinkFloydFan:
Ja, das ist richtig, die GroupBox befindet sich auf TabSheetXXX eines PageControl's..
Dann musst du den Code wohl im onMouseUp Ereignis von TabSheetXXX machen:
Delphi-Quellcode:
procedure TForm1.TabSheetXXXMouseUp(Sender: TObject; Button: TMouseButton;
  Shift: TShiftState; X, Y: Integer);
begin
  if TabSheetXXX.ControlAtPos(TabSheetXXX.ScreenToClient(mouse.CursorPos), true, true)= Groupbox1 then
    showmessage('Warnung');
end;
EDIT:if TabSheetXXX.ControlAtPos(Point(X, Y), true, true)= Groupbox1 then würde im onMouseUp Ereignis natürlich auch reichen.
Gruß bitsetter
"Viele Wege führen nach Rom"
Wolfgang Mocker (geb. 1954), dt. Satiriker und Aphoristiker
  Mit Zitat antworten Zitat