안녕 하세요?
BacTeria 박종민 입니다.
예비군 훈련 관계로 몇일 쉬었네요... ㅋㅋ
제목처럼 팁은 아니구요. 기본 문법에 해당 되려남?? 쩝~ 하여간요. 변수 초기화 하는 방법 입니다.
도움이 되는 분이 있길 빌며...
오늘도 수고 하세요~
procedure TForm1.Button1Click(Sender: TObject);
const
Temp_Array : array [1..3] of record
i : integer;
str : string;
end = ( (i: 100; str: 'String 1'),
(i: 200; str: 'String 2'),
(i: 300; str: 'String 3') );
begin
Caption := Temp_Array[1].str;
end;
|