Article View: fj.lang.pascal
Article #213Re: Modula-2, Oberon-2, Delphi(Re: Questions...)
From: C00279
Date: Fri, 06 Dec 1996 00:00
Date: Fri, 06 Dec 1996 00:00
32 lines
1360 bytes
1360 bytes
$B!!8MED$5$s(B@$B?73cBg$N8f<ALd!'(B
$B!d(BDelphi$B$G(B
$B!d(BProgram HellowWirth(output);
$B!d(Bbegin
$B!d(B writeln('Hello, Wirth!')
$B!d(Bend.
$B!d(B
$B!d!!$NN`$N%3!<%I$,%3%s%Q%$%k$G$-$k$N$G$7$g$&$+!#(B
$B%3%s%=!<%k%"%W%j%1!<%7%g%s$H$7$F:n@.$9$l$P$G$-$^$9!#(B
Windows$B$G$NI8=`F~=PNO$O(BGUI$B$G$9$+$i!"F~LgMQ$G$NJ8;zNs$NI=<($O(Bwriteln$B$G$O(B
$B$J$/!"$=$l$K8+9g$C$?$b$N$rMxMQ$9$k$Y$-$G$7$g$&!#(B
$B$^$?!"(BDelphi$B$O%S%8%e%"%k$J%W%m%0%i%_%s%0%D!<%k$G$9$+$i!"%W%m%0%i%_%s%0$b(B
$B%f%K%C%H>e$G9T$&$N$,I8=`E*$JJ}K!$K$J$C$F$$$^$9!#(B
$B=>$C$F!"(BDelphi$B$G$NF~LgMQ$N4JC1$JNc$O!"<!$N$h$&$K$J$j$^$9!#(B
procedure TForm1.FormCreate(Sender: TObject);
begin
ShowMessage('Hello, Toda!');
end;
FormCreate$B%a%=%C%I$O%W%m%0%i%_%s%0;~$K$*$$$F%U%)!<%`$N%@%V%k%/%j%C%/$K(B
$B$h$C$FI=<($5$l$^$9!#$3$N%a%=%C%I$O%W%m%0%i%`$N<B9T3+;O;~$K8F$S=P$5$l$^$9!#(B
$B2,K\0B@2(B
C00279@sinet.ad.jp
Technical Details
Message-ID:
<E1zur9.88x@info.sinet.ad.jp>Path:
arc1-ca.pugleaf.net!unknown!not-for-mailShow Full Headers
Complete Article Headers
X-Google-Language: Japanese,JIS X-Google-Thread: ff90a,2325d4073f665d64,start X-Google-Attributes: gidff90a,public From: C00279@sinet.ad.jp Subject: Re: Modula-2, Oberon-2, Delphi(Re: Questions...) Date: 1996/12/06 Message-ID: <E1zur9.88x@info.sinet.ad.jp> X-Deja-AN: 202691854 sender: news@info.sinet.ad.jp (cnews-Admin) organization: simail newsgroups: fj.lang.pascal