Re: Modula-2, Oberon-2, Delphi(Re: Questions...)

Thread View: fj.lang.pascal

1 messages

[T] Back to Threads [V] Tree View [G] Group Articles

1 total messages Started by C00279 Fri, 06 Dec 1996 00:00

#213

Author: C00279
Date: Fri, 06 Dec 1996 00:00

32 lines
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

Thread Navigation

This is a paginated view of messages in the thread with full content displayed inline.

Messages are displayed in chronological order, with the original post highlighted in green.

Use pagination controls to navigate through all messages in large threads.

Back to All Threads