Article View: fj.lang.pascal
Article #279$B65$($F$/$@$5$$!#(J
From: Masakatsu Kudoh
Date: Fri, 21 Feb 1997 00:00
Date: Fri, 21 Feb 1997 00:00
39 lines
1284 bytes
1284 bytes
$B#C8@8l$G0J2<$N$h$&$J%3!<%G%#%s%0$r!"#D#e#l#p#h#i$KD>$7$^$7$?!#(J
-- C --
typedef struct {
$B!!!!(Jchar $B!!!!!!!!!!!!(JName[10];
unsigned short $B!!(JMin;
unsigned short $B!!(JMax;
} ABCD;
ABCD datas[3] = {
$B!!(J{"TestNo.000", 0, 0},
$B!!(J{"TestNo.001",100,100},
$B!!(J{" d s s s ", 24, 10}
$B!!!!!!(J};
-- DELPHI --
Tabcd = record
Name[10] : string;
Min : Word;
Max : Word;
end;
ABCD = array[0..2] of Tabcd;
Datas : ABCD = (('TestNo.000', 0, 0), <--(A)
('TestNo.001',100,120),
(' d s s s ', 25, 10)
);
$B!!$3$N$h$&$J46$8$G%3!<%G%#%s%0$9$k$H!"(J(A)$B$G%(%i!<$,H/@8$7$^$9!#<+J,$H$7$F$O(J
$B$3$N%3!<%G%#%s%0$,0-$$$h$&$J5$$,$7$^$9!#@53N$K$O$I$&%3!<%G%#%s%0$r$9$l$P$$(J
$B$$$s$G$7$g$&$+!)(J
--
Masakatsu Kudoh(masak@hi-net.or.jp)
Technical Details
Message-ID:
<01bc2000$b0b25fa0$f9faf8ca@toshiba-user>Path:
arc1-ca.pugleaf.net!unknown!not-for-mailShow Full Headers
Complete Article Headers
X-Google-Language: Japanese,JIS X-Google-Thread: ff90a,6be766113502efaa,start X-Google-Attributes: gidff90a,public From: "Masakatsu Kudoh" <masak@hi-net.or.jp> Subject: $B65$($F$/$@$5$$!#(J Date: 1997/02/21 Message-ID: <01bc2000$b0b25fa0$f9faf8ca@toshiba-user> X-Deja-AN: 220534894 Organization: Hachinohe Internet Services(HI-NET) Newsgroups: fj.lang.pascal