Delphi Programming Forum
C++Builder  |  Delphi  |  FireMonkey  |  C/C++  |  Free Pascal  |  Firebird
볼랜드포럼 BorlandForum
 경고! 게시물 작성자의 사전 허락없는 메일주소 추출행위 절대 금지
델파이 포럼
Q & A
FAQ
팁&트릭
강좌/문서
자료실
컴포넌트/라이브러리
FreePascal/Lazarus
볼랜드포럼 홈
헤드라인 뉴스
IT 뉴스
공지사항
자유게시판
해피 브레이크
공동 프로젝트
구인/구직
회원 장터
건의사항
운영진 게시판
회원 메뉴
북마크
델마당
볼랜드포럼 광고 모집

델파이 Q&A
Delphi Programming Q&A
[3155] [답변] DAREUN/ 델파이의 triggerevent는 있는지..
시리우스 [ ] 1119 읽음    1998-06-06 03:21
음...
물론 델파이에서도 Trigger Event가 있지요...
파워빌더 보다 더욱 강력한...
질문의 내용을 제가 정확히 이해 했는지 모르겠는데...
TabbedNoteBook의 OnChange 이벤트를 임의로 부를 수 있도록
예제를 만들어 봤습니다...
간단히 TabbedNoteBook을 붙이시고 버튼을 하나 붙이세요...
글구... TabbedNoteBook의 OnChange Event에다가 아래와 같이
코딩하시구요...

procedure TForm1.TabbedNotebook1Change(Sender: TObject; NewTab: Integer;
  var AllowChange: Boolean);
begin
  ShowMessage('안녕하세요? 탭페이지 1번 입니다');
end;
그 담에 이 이벤트를 부를 버튼을 하나 붙이신담에...
Button의 OnClick 이벤트에다가 아래와 같이 코딩해 보세요...

procedure TForm1.Button1Click(Sender: TObject);
var
  Soo: Boolean;
begin
  TabbedNoteBook1Change(Self, 0, Soo);
end;
글구 실행해 보세요... 어때요?
잘 작동 하지요?
TabbedNoteBook1Change Procedure의 인자에 맞게 값만 대입시켜
주면 간단히 해결할 수 있습니다.
여기서 마지막 인자 AllowChange는 포인터에 의한 참조니깐...
직접 True등으로 값을 주시면 안되는건 아시죠?
직접 변수를 넣어 주셔야 합니다...
그럼 즐통 되시길...


+ -

관련 글 리스트
3155 [답변] DAREUN/ 델파이의 triggerevent는 있는지.. 시리우스 1119 1998/06/06
Google
Copyright © 1999-2015, borlandforum.com. All right reserved.