jetvision.de
Kinetic SBS-1 Support
fliteprep.de Feelthere Support
IVAO DE Support
Miscellaneous
|
|
Programming hints
that I tend to forget
and search again every once and a while. |
| |
| Windows API |
| |
| Get a window position: var pwi:TwindowInfo; GetWindowInfo(hwnd,pwi); rect:=pwi.rcWindow; |
| |
|
Activate a window:
SetWindowtoForeground (hwnd); |
| |
|
Send a Mouse Event:
SetCursorPos(x,y); Mouse_Event(action,0,0,0,0); |
| |
|
Get UTC Time
var
tiempo:_SYSTEMTIME;
begin
GetSystemTime(tiempo);
memo1.Lines.Add('Date: '+IntToStr(tiempo.wDay)+'/'+IntToStr(tiempo.wMonth)+'/'+IntToStr(tiempo.wYear));
memo1.Lines.Add('Day of Week '+IntToStr(tiempo.wDayOfWeek));
end; |
| |
|
|