[es] - Dos gui u visual basicu

mladenovicz
Zeljko Mladenovic
Xoran Technologies, Inc., Ann Arbor, MI,
USA / Software Engineer
Ann Arbor, MI, USA

Član broj: 6598
Poruke: 2065
*.bg.wifi.vline.verat.net.

Jabber: mladenovicz@elitesecurity.org
ICQ: 95144142
Sajt: yubc.net/~mz

Profil

Re: Dos gui u visual basicu

^{09.12.2004. u 10:02 - pre 235 meseci}

Sad moras da pomeris prozor i da ga resizeujes.

Dodaj u deklaracije ovo

Code:

Const HWND_TOPMOST = -1
Const HWND_NOTOPMOST = -2
Const SWP_NOSIZE = &H1
Const SWP_NOMOVE = &H2
Const SWP_NOACTIVATE = &H10
Const SWP_SHOWWINDOW = &H40

Private Declare Sub 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)

i promeni form load da izgleda ovako

Code:

Private Sub Form_Load()
    'KPD-Team 1999
    'URL: http://www.allapi.net/
    'E-Mail: [email protected]
    Dim Pid As Long

    Me.WindowState = vbMaximized

    'Lock the window update
    LockWindowUpdate GetDesktopWindow
    Pid = Shell("cmd.exe", vbNormalFocus)
    If Pid = 0 Then MsgBox "Error starting the app"
    mWnd = InstanceToWnd(Pid)
    SetParent mWnd, Me.hWnd
    SetWindowPos mWnd, 0, -4, -24, Me.Width, Me.Height, SWP_NOZORDER Or SWP_SHOWWINDOW
    Putfocus mWnd
    LockWindowUpdate False
End Sub

Blue Man Group

Odgovor na temu

D u C k

Član broj: 40150
Poruke: 11
*.net.t-com.hr.

Profil

Re: Dos gui u visual basicu

^{09.12.2004. u 21:26 - pre 235 meseci}

Vidim da ima napredka i nadam se da ce biti nesto od toga, ovo je sad puno bolje od onog al fali mi jos pola ekrana da ga rastegne, to ne mogu nikako dobiti
probao sam upisivati pod with i height duzine al ne prihvaca, saljem i sliku da vidis kako bi to bude.

Probao sam umjesto ovoga staviti da otvara POS.PIF (umjesto CMD.EXE) al kad stavim pif baca ga u onaj dosov full screen tako da mi prekrije i windowse i sve
mislim da znas na sta misli, a pif bi meni i trebao da otvara najvise jer ovako imam one linije u programu.

Najbolje bi bilo da kad vindows salta sebe u onaj full screen da se to nekako promijeni i umjesto preko cijelog ekrana da ga strpa u vb formu

Znas li kako da dobijem to, evo slicice, pozdrav

Prikačeni fajlovi

window.jpg - 47.27k

Odgovor na temu

D u C k

Član broj: 40150
Poruke: 11
*.net.t-com.hr.

Profil

Re: Dos gui u visual basicu

^{09.12.2004. u 21:52 - pre 235 meseci}

Evo ova nova slika ce ti najbolje pokazati o cemu je rijec. Ja i kad stavim rucno da mi je cmd preko cijelog prozora to radi, al kad pokrenem aplikaciju on ga automatski smanji na neki minimum i iako ga ja pokuso opet povecati opce ga ne ferma, i tu mozes najbolje vidjeti te linije sto sam ti govorio, buduci da se tehnologija mijenjala :) bilo je potrebno prosiriti aplikaciju (menu) pa je trebalo povecati prozor i to sad radi jedna datoteka koja to makne, al ona kad se pozove program ode u FULL SCREEN i radi a ovako nista.

Mozda ti bude jasnije kad vidis...

Prikačeni fajlovi

window2.jpg - 80.23k

Odgovor na temu