Zitat von
Pr0g:
Schau dir doch mal den Code in der "Windows.pas" an, hier nen Beispiel (habs nicht getestet, müsste aber gehen:
Delphi-Quellcode:
...
function CreateWindowEx(dwExStyle: DWORD; lpClassName: PChar;
lpWindowName: PChar; dwStyle: DWORD; X, Y, nWidth, nHeight: Integer;
hWndParent: HWND; hMenu: HMENU; hInstance: HINST; lpParam: Pointer): HWND; stdcall;
var
Form1: TForm1;
implementation
{$R *.dfm}
function CreateWindowEx; external 'user32.dll' name 'CreateWindowExA';
procedure TForm1.Button1Click(Sender: TObject);
begin
CreateWindowEx(...);
end;
end.
Nur obs bei der so was bringt glaube ich nicht, da sie eh in der Windows.pas steckt, welche du einbinden musst.
Aber warum das ganze?
MfG Pr0g
Vllt. glaubt er so die Größe der Echse reduzieren zu können....