Static 변수 사용하기
APP 2012. 10. 23. 20:08 |procedure TForm1.Button1Click(Sender: TObject);
const
{$J+}
aaa: integer = 1;
{$J-}
begin
caption := inttostr(aaa);
aaa := aaa + 1;
end;
'APP' 카테고리의 다른 글
| 중복 실행 방지 (0) | 2012.10.23 |
|---|---|
| TListView 스크롤바 없애기 (0) | 2012.10.23 |
| 바탕화면, 즐겨찾기, 내 문서 등의 경로얻기 (0) | 2012.10.23 |
| GUID 생성 (0) | 2012.10.23 |
| 현재 떠있는 모든 창 캡션 구하기 (0) | 2012.10.23 |