vb@rchiv
VB Classic
VB.NET
ADO.NET
VBA
C#
sevAniGif - als kostenlose Vollversion auf unserer vb@rchiv CD Vol.5  
 vb@rchiv Quick-Search: Suche startenErweiterte Suche starten   Impressum  | Datenschutz  | vb@rchiv CD Vol.6  | Shop Copyright ©2000-2025
 
zurück

 Sie sind aktuell nicht angemeldet.Funktionen: Einloggen  |  Neu registrieren  |  Suchen

Fortgeschrittene Programmierung
Re: API's aufrufen 
Autor: marc
Datum: 22.01.03 11:25

Danke für den Tipp, aber es geht mir eigentlich darum, API Funktionen zu verwenden. Also in einem Modul definiere ich die API

Public Declare Function SetWindowPos Lib "user32" _
(ByVal hwnd As Long, ByVal hWndInsertAfter As Long, _
ByVal x As Long, ByVal y As Long, ByVal cx As Long, _
ByVal cy As Long, ByVal wFlags As Long) As Long

Public Type RECT
Left As Long
Top As Long
Right As Long
Bottom As Long
End Type

Private Const SWP_NOZORDER = &H4
Private Const SWP_NOMOVE = &H2

Dim frmRec As RECT

und im Ereignis Form_Resize

With frmRect
SetWindowPos Forms![frm_Start].hwnd, 0, frmRect.Top, frmRect.Left, frmRect.Right, frmRect.Bottom,
SWP_NOMOVE Or SWP_NOZORDER
End With

den code hab ich von dem Bsp. unter Tipps&Tricks.

ach ja und in Form_Load wird noch die Fenstergröße gespeichert.

'With frmRect
' .Left = Forms![frm_Start].Left / Screen.TwipsPerPixelX
'.Top = Forms![frm_Start].Top / Screen.TwipsPerPixelY
'.Right = Forms![frm_Start].Width / Screen.TwipsPerPixelX
'.Bottom = Forms![frm_Start].Height / Screen.TwipsPerPixelY
'End With

wobei Screen.TwipsPerPixelX kennt der Compiler auch nicht.
alle Nachrichten anzeigenGesamtübersicht  |  Zum Thema  |  Suchen

 ThemaViews  AutorDatum
API's aufrufen171marc21.01.03 15:51
Re: API's aufrufen335ModeratorDieter21.01.03 15:56
Re: API's aufrufen110marc22.01.03 08:26
Re: API's aufrufen453dbayer22.01.03 09:00
Re: API's aufrufen315ModeratorDieter22.01.03 09:03
Re: API's aufrufen109marc22.01.03 11:25
Re: API's aufrufen490ModeratorDieter22.01.03 11:29
Re: API's aufrufen116marc22.01.03 12:54
Re: API's aufrufen318ModeratorDieter22.01.03 13:30
Re: API's aufrufen104marc22.01.03 13:44

Sie sind nicht angemeldet!
Um auf diesen Beitrag zu antworten oder neue Beiträge schreiben zu können, müssen Sie sich zunächst anmelden.

Einloggen  |  Neu registrieren

Funktionen:  Zum Thema  |  GesamtübersichtSuchen 

nach obenzurück
 
   

Copyright ©2000-2025 vb@rchiv Dieter Otter
Alle Rechte vorbehalten.
Microsoft, Windows und Visual Basic sind entweder eingetragene Marken oder Marken der Microsoft Corporation in den USA und/oder anderen Ländern. Weitere auf dieser Homepage aufgeführten Produkt- und Firmennamen können geschützte Marken ihrer jeweiligen Inhaber sein.

Diese Seiten wurden optimiert für eine Bildschirmauflösung von mind. 1280x1024 Pixel