Q&A
- 페이지컨트롤 이동시 원점으로 돌아오기...
델파이 초보자 입니다.
페이지컨트롤의 탭이 여러개있을경우..(a,b,c,..);
a탭시트의 페이지에서 b탭시트로 change 했을경우... 주요필드 3개가 입력이 되어야 다음으로 넘어가게끔 했는데.
메시지는 나오는데 메시지후 다시 a로 가는게 아니라 b로 가네요..
에러메시지후 원래 선택했던 시트로 가려면 어떻게 처리를 해야 하나요..
우연히 bookmark라는걸 봤는데. 이럴때 bookmark 적용해도 되나요?
procedure Tmain_frm.pageChanging(Sender: TObject;
var AllowChange: Boolean);
begin
case page.ActivePage.TabIndex of
0:
begin
if
(ed_name.text <> '') AND (cb_sex.text <> '') AND
(cb_group.text <> '') then
exit
else
ShowMessage('주항목을 입력하지 않았습니다. ! ');
end;
1:
begin
if
(ed_name.text <> '') AND (cb_sex.text <> '') AND
(cb_group.text <> '') then
exit
else
ShowMessage('주항목을 입력하지 않았습니다. ! ');
end;
페이지컨트롤의 탭이 여러개있을경우..(a,b,c,..);
a탭시트의 페이지에서 b탭시트로 change 했을경우... 주요필드 3개가 입력이 되어야 다음으로 넘어가게끔 했는데.
메시지는 나오는데 메시지후 다시 a로 가는게 아니라 b로 가네요..
에러메시지후 원래 선택했던 시트로 가려면 어떻게 처리를 해야 하나요..
우연히 bookmark라는걸 봤는데. 이럴때 bookmark 적용해도 되나요?
procedure Tmain_frm.pageChanging(Sender: TObject;
var AllowChange: Boolean);
begin
case page.ActivePage.TabIndex of
0:
begin
if
(ed_name.text <> '') AND (cb_sex.text <> '') AND
(cb_group.text <> '') then
exit
else
ShowMessage('주항목을 입력하지 않았습니다. ! ');
end;
1:
begin
if
(ed_name.text <> '') AND (cb_sex.text <> '') AND
(cb_group.text <> '') then
exit
else
ShowMessage('주항목을 입력하지 않았습니다. ! ');
end;
2
COMMENTS
-
-
AllowChange를 사용하시면 될텐데요..
입력값이 제대로 들어오지 않았을대는 AllowChange를 false로 만들어 주시면 페이지가 넘어가지 않는답니다..
최은정 wrote:
> 델파이 초보자 입니다.
> 페이지컨트롤의 탭이 여러개있을경우..(a,b,c,..);
> a탭시트의 페이지에서 b탭시트로 change 했을경우... 주요필드 3개가 입력이 되어야 다음으로 넘어가게끔 했는데.
> 메시지는 나오는데 메시지후 다시 a로 가는게 아니라 b로 가네요..
> 에러메시지후 원래 선택했던 시트로 가려면 어떻게 처리를 해야 하나요..
> 우연히 bookmark라는걸 봤는데. 이럴때 bookmark 적용해도 되나요?
>
> procedure Tmain_frm.pageChanging(Sender: TObject;
> var AllowChange: Boolean);
> begin
> case page.ActivePage.TabIndex of
> 0:
>
> begin
> if
> (ed_name.text <> '') AND (cb_sex.text <> '') AND
> (cb_group.text <> '') then
> exit
> else
> ShowMessage('주항목을 입력하지 않았습니다. ! ');
> end;
>
> 1:
> begin
> if
> (ed_name.text <> '') AND (cb_sex.text <> '') AND
> (cb_group.text <> '') then
> exit
> else
> ShowMessage('주항목을 입력하지 않았습니다. ! ');
> end;
>
(NOTICE) You must be logged in to comment on this post.
-
- 김진호
- •
- 2000.03.31 00:48
- 2 COMMENTS
- /
- 0 LIKES
-
구창민•2000.03.31 01:39김진호 wrote: > Enumerated 타입에서 아무값도 넣어 주지 않을려면 어떻게 해야 하나요? > > 컴포넌트...
-
유수•2000.03.31 01:38열거형은 요소의 차례대로 값이 부여됩니다.(0부터..) 값의 범위를 갖는 Integer이라 보면되져. 그...
-
- 불타는 델파이
- •
- 2000.03.31 00:42
- 1 COMMENTS
- /
- 0 LIKES
-
구창민•2000.03.31 01:43불타는 델파이 wrote: > 안녕하세요. 항상 좋은 대답에 감사드립니다. > 지금 제가 드릴 질문은 퀵레포터...
-
- QUICK
- 2000.03.31 00:41
- 0 COMMENTS
- /
- 0 LIKES
-
- 김기용
- 2000.03.31 00:10
- 0 COMMENTS
- /
- 0 LIKES
-
- 홍재만
- 2000.03.30 23:57
- 0 COMMENTS
- /
- 0 LIKES
-
- 강정민
- 2000.03.30 23:27
- 0 COMMENTS
- /
- 0 LIKES
-
- 김초보
- •
- 2000.03.30 23:23
- 1 COMMENTS
- /
- 0 LIKES
-
최용일•2000.03.30 23:43아래 함수로 두 파일을 비교해 보세요... 그리고 기능이 먹통이 됐다는데 어떤 기능인지...? 아마도 ...
-
-
유수•2000.03.31 01:00마우스로도 됩니다. Option중 RangeSelect가 관계있습니다. 확인해 보세요. nambada wrote: > ...
-
-
- 김경태
- •
- 2000.03.30 21:55
- 1 COMMENTS
- /
- 0 LIKES
-
최용일•2000.03.30 22:25폼의 KeyPreview속성을 True로 하시고 OnKeyDown이벤트에서 Alt-F4를 무효화시키시 면 됩니다. procedu...
-
- 델파이을 하고픈 사람
- •
- 2000.03.30 21:49
- 1 COMMENTS
- /
- 0 LIKES
-
김영숙•2000.03.31 18:02델파이을 하고픈 사람 wrote: > 안녕하세요. > 제기 ibm OS/390(V2.5)의 DB2(V5.1)에 델파이5로 프로그램...
-
- 델파이을 하고픈 사람
- 2000.03.30 21:47
- 0 COMMENTS
- /
- 0 LIKES
-
- gh0st lee
- •
- 2000.03.30 21:31
- 1 COMMENTS
- /
- 0 LIKES
-
최석기•2000.03.30 22:36gh0st lee wrote: > 원래 1메가 정도하는 파일이 컴파일만 하면 350킬로바이트로 줄어들어요.... > 아마...
-
- 송수현
- •
- 2000.03.30 21:11
- 1 COMMENTS
- /
- 0 LIKES
-
유수•2000.03.31 00:54원하시는 것이 어떤 것인지 정확하게 알수 없지만, 실행프로그램과 db가 같은 폴더에 존재한다면, Data...
-
-
유수•2000.03.31 00:49먼저 같은 폼으로 쓸 폼을 디자인 합니다. 그 폼의 이름이 TForm2이고, 메인 폼이 TForm1이라면, ...
-
-
- 안영식
- •
- 2000.03.30 20:14
- 1 COMMENTS
- /
- 0 LIKES
-
최용일•2000.03.30 22:11아마도 이미지를 클릭했을때 메모의 OnExit이벤트를 처리하려고 하는것같은데... 이미지의 OnClick이벤...
-
- 이수정
- •
- 2000.03.30 19:53
- 2 COMMENTS
- /
- 0 LIKES
-
문홍철•2000.03.30 22:31이수정 wrote: > procedure TForm1.BitBtn1Click(Sender: TObject); > begin > personview(BitBtn1.Ca...
-
최용일•2000.03.30 20:02프라퍼티는 var파라매터로 넘길수 없습니다... PersionView에서 var를 빼시거나 BitBtn1.Caption을 변수...
-
- 정형모
- •
- 2000.03.30 19:31
- 1 COMMENTS
- /
- 0 LIKES
-
공성환•2000.03.30 20:49정형모 wrote: > 먼저 답변에 감사드립니다... > 근데 DBGirdEH에는 FooterRowCount라는 프로퍼티도 없고...
-
- 최은정
- •
- 2000.03.30 19:29
- 2 COMMENTS
- /
- 0 LIKES
델파이 초보자 입니다. 페이지컨트롤의 탭이 여러개있을경우..(a,b,c,..); a탭시트의 페이지에서 b탭시트로 change 했을경우... 주요필드 3개가 입력이 되어야 다음으로 넘어가게끔 했는데. 메시지는 나오는데 메시지후 다시 a로 가는게 ...-
박성훈•2000.03.30 19:44최은정 wrote: > 델파이 초보자 입니다. > 페이지컨트롤의 탭이 여러개있을경우..(a,b,c,..); > a탭시트...
-
최석기•2000.03.30 19:43AllowChange를 사용하시면 될텐데요.. 입력값이 제대로 들어오지 않았을대는 AllowChange를 false로 만...
-
- 최연수
- •
- 2000.03.30 19:27
- 1 COMMENTS
- /
- 0 LIKES
-
최용일•2000.03.30 20:57가장 좋은 방법은 InputBox를 새롭게 만드시는 것입니다. 사실 InputBox라는게 다이얼로그폼에 에디트하나...
-
> 델파이 초보자 입니다.
> 페이지컨트롤의 탭이 여러개있을경우..(a,b,c,..);
> a탭시트의 페이지에서 b탭시트로 change 했을경우... 주요필드 3개가 입력이 되어야 다음으로 넘어가게끔 했는데.
> 메시지는 나오는데 메시지후 다시 a로 가는게 아니라 b로 가네요..
> 에러메시지후 원래 선택했던 시트로 가려면 어떻게 처리를 해야 하나요..
> 우연히 bookmark라는걸 봤는데. 이럴때 bookmark 적용해도 되나요?
>
> procedure Tmain_frm.pageChanging(Sender: TObject;
> var AllowChange: Boolean);
> begin
> case page.ActivePage.TabIndex of
> 0:
>
> begin
> if
> (ed_name.text <> '') AND (cb_sex.text <> '') AND
> (cb_group.text <> '') then
> exit
> else
> ShowMessage('주항목을 입력하지 않았습니다. ! ');
> end;
>
> 1:
> begin
> if
> (ed_name.text <> '') AND (cb_sex.text <> '') AND
> (cb_group.text <> '') then
> exit
> else
> ShowMessage('주항목을 입력하지 않았습니다. ! ');
> end;
>
AllowChange:= False를 하시면 탭이동이 안되는군요.