Einzelnen Beitrag anzeigen

EWeiss
(Gast)

n/a Beiträge
 
#13

AW: Fensterposition persistent machen

  Alt 30. Mär 2018, 21:38
werfe die VCL weg und mache es von Hand.

Delphi-Quellcode:
    SetRect(rc, 0, 0, XMIN_SIZE, YMIN_SIZE);
    AdjustWindowRectEx(rc, dwStyle, False, dwExStyle);

    X := MAX((GetSystemMetrics(SM_CXSCREEN) - rc.Right - rc.Left) div 2, 0);
    Y := MAX((GetSystemMetrics(SM_CYSCREEN) - rc.Bottom - rc.top) div 2, 0);

    MainHandle := CreateWindowEx(dwExStyle, myClass, myTitle, dwStyle, X, Y, rc.Right - rc.Left,
      rc.Bottom - rc.top, 0, 0, wc.hInstance, nil);
gruss

Geändert von EWeiss (30. Mär 2018 um 21:44 Uhr)
  Mit Zitat antworten Zitat