🚀 go-pugleaf

RetroBBS NetNews Server

Inspired by RockSolid Light RIP Retro Guy

Article View: fj.lang.basic
Article #182

Comdlg32.dllの使い方

#182
From: T.FUJII
Date: Thu, 23 Oct 1997 00:00
23 lines
1450 bytes
$B$*@$OC$K$J$j$^$9!#(B

Comdlg32.dll $B$r;H$C$F(B

    CMDialog1.Flags = cdlPDPrintSetup               '$B%W%j%s%?@_Dj%@%$%"%m%0(B
$B%\%C%/%9$r;XDj(B
    CMDialog1.Action = 5                            '$B%@%$%"%m%0%\%C%/%9$NI=(B
$B<((B

$B$H5-=R$7$FF0:n$9$k!"(BComdlg32.ocx$B$HF1$8$3$H$r9T$$$?$$$N$G$9$,!"(BDLL$B$H$I$N$h$&(B
$B$J%j%s%/$r5-=R$9$l$P$h$$$N$+$o$+$j$^$;$s!#(B
Private Declare Function GetOpenFileName Lib "comdlg32.dll" Alias _
  "GetOpenFileNameA" (pOpenfilename As OPENFILENAME) As Long

$B$O%U%!%$%k%*!<%W%s$G$9$,!"%W%j%s%?!<$N@_Dj2hLL$O$I$&$7$?$i$G$k$N$G$7$g$&$+!)(B

$B$I$J$?$+%5%s%W%k%3!<%I!J(BDecleare $B@k8@$b4^$a$F!K$r65$($F$O$/$@$5$i$J$$$G$7$g(B
$B$&$+!#$^$?!"$3$N(BDLL$B$K4X$9$k@bL@$,$"$k%5%$%H$r$4B8$8$NJ}$O$*$l$l$J$$$G$7$g$&(B
$B$+!)(B

---------------
t-fujii@interlink.or.jp
Technical Details
Message-ID: <62mkka$cu0$1@news2.osk.threewebnet.or.jp>
Path: arc1-ca.pugleaf.net!unknown!not-for-mail

Show Full Headers
Complete Article Headers
X-Google-Language: Japanese,JIS
X-Google-Thread: 110a07,11f44c2676d22821,start
X-Google-Attributes: gid110a07,public
X-Google-Thread: f5300,11f44c2676d22821,start
X-Google-Attributes: gidf5300,public
From: "T.FUJII" <t-fujii@interlink.or.jp>
Subject: Comdlg32.dllの使い方
Date: 1997/10/23
Message-ID: <62mkka$cu0$1@news2.osk.threewebnet.or.jp>
X-Deja-AN: 282567229
X-MimeOle: Produced By Microsoft MimeOLE Engine V4.71.1008.3
Organization: TK Software
Newsgroups: fj.lang.basic,fj.os.ms-windows.programming