Q&A
- 꼭 알려주세요...
다시 답변 부탁드립니다.
MDI를 써서 폼을 만들었습니다. main form 과 두개의 child form을요....
그런데 실행을 시키면 child form이 뜨기전에 이런 에러 메시지가 뜹니다..
List index out of bounds(0) 라구요....
왜 이런 메시지가 뜨는지 꼭좀 빨리 알려주세요...
혹시 midchildren 때문인지...제 메인 소스를 띄웁니다...
뭐가 잘못되었는지 자세하게 알려주시면 감사....
procedure TMAINF.psActFormClose;
var
I : ShortInt;
begin
if MDIChildCount > 1 then
begin
for I := MDIChildCount - 1 downto 0 do
MDIChildren[I].Close;
end;
end;
procedure TMAINF.N1Click(Sender: TObject);
begin
psActFormClose;
TForm2.Create(Application);
end;
procedure TMAINF.N2Click(Sender: TObject);
begin
psActFormClose;
TForm3.Create(Application);
end;
MDI를 써서 폼을 만들었습니다. main form 과 두개의 child form을요....
그런데 실행을 시키면 child form이 뜨기전에 이런 에러 메시지가 뜹니다..
List index out of bounds(0) 라구요....
왜 이런 메시지가 뜨는지 꼭좀 빨리 알려주세요...
혹시 midchildren 때문인지...제 메인 소스를 띄웁니다...
뭐가 잘못되었는지 자세하게 알려주시면 감사....
procedure TMAINF.psActFormClose;
var
I : ShortInt;
begin
if MDIChildCount > 1 then
begin
for I := MDIChildCount - 1 downto 0 do
MDIChildren[I].Close;
end;
end;
procedure TMAINF.N1Click(Sender: TObject);
begin
psActFormClose;
TForm2.Create(Application);
end;
procedure TMAINF.N2Click(Sender: TObject);
begin
psActFormClose;
TForm3.Create(Application);
end;
1
COMMENTS
(NOTICE) You must be logged in to comment on this post.
-
- 김진호
- •
- 2000.04.01 19:56
- 3 COMMENTS
- /
- 0 LIKES
-
blueSky•2000.04.01 20:18김진호 wrote: > 탭키를 못쓰게 하려고 합니다. 그래서 keydown이벤트의 설정을 해 놨는데 탭키는 계속 작... -
김진호•2000.04.01 20:43답변 감사합니다. 이것을 특정 컴포넌트에만 적용시킬수 있나요? 예를 들면 Edit1에만 탭키를 disabl...
-
blueSky•2000.04.01 22:42김진호 wrote: > 답변 감사합니다. > > 이것을 특정 컴포넌트에만 적용시킬수 있나요? > > 예를 들...
-
- 정연
- •
- 2000.04.01 19:19
- 1 COMMENTS
- /
- 0 LIKES
-
김형선•2000.04.01 21:56정연 wrote: > NAME 필드가 없다구 하네요 --;;; > > 방법을 못찾겠어요 제가 답변을 해도 되는지 ...
-
- 황비옹
- 2000.04.01 18:29
- 0 COMMENTS
- /
- 0 LIKES
-
- 이수정
- •
- 2000.04.01 16:26
- 3 COMMENTS
- /
- 0 LIKES
-
nilriri•2000.04.01 18:26procedure TForm1.Timer1Timer(Sender: TObject); begin button1click(button1); //1분이 되면 타이...
-
이수정•2000.04.01 18:51nilriri wrote: > procedure TForm1.Timer1Timer(Sender: TObject); > begin > button1click(button...
-
nilriri•2000.04.02 05:29이수정 wrote: > nilriri wrote: > > procedure TForm1.Timer1Timer(Sender: TObject); > > begin > > ...
-
- 박종삼
- •
- 2000.04.01 13:06
- 1 COMMENTS
- /
- 0 LIKES
-
최용일•2000.04.01 15:20안녕하세요. 최용일입니다. 아래의 SendMessage를 빼셔야 겠는데요. SendMessage를 넣으시면 일종의 ...
-
- 까마귀
- •
- 2000.04.01 12:36
- 1 COMMENTS
- /
- 0 LIKES
-
최용일•2000.04.01 13:05안녕하세요. 최용일입니다. 컨트롤이 포커스를 받을때 실행되는 이벤트는 OnEnter입니다. 포커스를 잃을...
-
- 급합
- •
- 2000.04.01 11:30
- 1 COMMENTS
- /
- 0 LIKES
-
최용일•2000.04.01 15:27안녕하세요. 최용일입니다. 코딩을 어떻게 하셨는지는 잘 모르겠지만. 리스트뷰에서 아이템의 추가, 삭...
-
- 이수정
- •
- 2000.04.01 11:19
- 1 COMMENTS
- /
- 0 LIKES
-
이경문•2000.04.19 17:07TEnhWavein, TEnhWaveOut : 세어웨어, 소스없슴, 다운 잘됨 TAudio(Hakan Bergzen) : 프리웨어, 소스있슴,...
-
- 델파인
- •
- 2000.04.01 09:48
- 2 COMMENTS
- /
- 0 LIKES
-
nuki•2000.04.02 09:29델파인 wrote: > 안녕하세요.. > 퀵리포트상에 QRmemo와 QRImage를 위치를 시켜놓고요.. > 퀵리포트 폼...
-
조규춘•2000.04.01 11:22델파인 wrote: > 안녕하세요.. > 퀵리포트상에 QRmemo와 QRImage를 위치를 시켜놓고요.. > 퀵리포트 폼...
-
- 정연
- •
- 2000.04.01 07:29
- 2 COMMENTS
- /
- 0 LIKES
-
안정한•2000.04.01 12:09with dm.q_family do begin st := '가족관계'; Close; ...
-
정연•2000.04.01 19:50안정한 wrote: > with dm.q_family do > begin > st := '가족관계'; > ...
-
- 창봉이
- •
- 2000.04.01 07:29
- 1 COMMENTS
- /
- 0 LIKES
-
조규춘•2000.04.01 08:39창봉이 wrote: > 델파이 객체지향에 대해서 아무거나 좀 글좀 올려 주세여.. > > 부탁드립니다... ...
-
- 창봉이
- 2000.04.01 07:28
- 0 COMMENTS
- /
- 0 LIKES
-
- zoro
- 2000.04.01 04:23
- 0 COMMENTS
- /
- 0 LIKES
-
- 이수정
- •
- 2000.04.01 04:09
- 1 COMMENTS
- /
- 0 LIKES
-
안정한•2000.04.01 04:278개가 더 될수도 있으니... Query1.close; SQL문장 Query1.open while not Query1.eof do begin ...
-
- 파란달
- •
- 2000.04.01 04:03
- 2 COMMENTS
- /
- 0 LIKES
-
최용일•2000.04.01 05:319435번에 실행시 컨트롤의 크기를 조절하는 예제가 있습니다. 참조하세요. 조절점이란 검색어로 검색하...
-
파란달•2000.04.01 11:53
-
- 민은홍
- •
- 2000.04.01 03:27
- 1 COMMENTS
- /
- 0 LIKES
다시 답변 부탁드립니다. MDI를 써서 폼을 만들었습니다. main form 과 두개의 child form을요.... 그런데 실행을 시키면 child form이 뜨기전에 이런 에러 메시지가 뜹니다.. List index out of bounds(0) 라구요.... 왜 이런 메시지가 ...-
하얀까마귀•2000.04.01 03:33안녕하세요 하얀까마귀 입니다. List index out of bounds(0) 에러는 리스트형 그러니까 콤보박스 ...
-
- Ghost lee
- •
- 2000.04.01 03:17
- 3 COMMENTS
- /
- 0 LIKES
-
조규춘와 언주•2000.04.01 04:24Ghost lee wrote: > 제 자리에 있는 컴퓨터에서 실행시키면 잘 되던 프로그램이 다른 컴퓨터로 옮기면 실...
-
조규춘•2000.04.01 07:55규추니 또 왔습니다. '에러메시지는 vcl40.bpl을 찾을 수 없다구 뜨는데... 아마 런타임패키지로 해서 ...
-
하얀까마귀•2000.04.01 03:36안녕하세요 하얀까마귀 입니다.. 그 파일을 해당 컴에 복사하면 되구요... 이걸 자동으로 하기 위해서 ...
-
- 델초.
- •
- 2000.04.01 03:01
- 2 COMMENTS
- /
- 0 LIKES
-
안정한•2000.04.01 04:21다음과 같이 사용하면 동적으로 정렬을 시킬 수 있을 겁니다. 아니면 이 곳 QA게시판에 DBGRID 동적으로...
-
하얀까마귀•2000.04.01 03:34안녕하세요 하얀까마귀 입니다. 디비 그리드에서 정렬은 안됩니다. 정렬을 하고 싶으시면 연결된 Tab...
-
- 최은정
- •
- 2000.04.01 03:00
- 2 COMMENTS
- /
- 0 LIKES
-
k•2000.04.01 03:43최은정 wrote: > 실제 per_sex라는 필드는 varchar(1) 인데..... ex) 0:남자 > ...
-
최석기•2000.04.01 03:33최은정 wrote: > 실제 per_sex라는 필드는 varchar(1) 인데..... ex) 0:남자 > ...
-
- 이용현
- 2000.04.01 02:49
- 0 COMMENTS
- /
- 0 LIKES
List index out of bounds(0)
에러는 리스트형 그러니까 콤보박스 같이 어떤 리스트를 가지는 곳에서 생기는 겁니다.
TStrings 를 쓰는 모든 콤포넌트에서 발생할수 있죠...
이 리스트는 값이 0 - max값을 가지고 값이 정해지지 않은 상태는 -1이 되죠..
만약 이 max값이 넘은 index를 주거나 index가 -1인 값을 리턴하라고 하면
에러가 생기죠..
간단히 말하면 child form을 생성시킬때 아마 form Create 나 form Show에서
어떤 리스트를 콘트롤하는 소스가 있을겁니다. 그부분을 참고해 보세요..
지금 주신 소스에는 그런부분이 없네요...
에러는 아마 차일드 폼에서 생기는 걸겁니다...
디버깅을 하면 금방 알수 있을텐데...
그럼.. 즐거운시간 되세요.
- 하얀까마귀 -
민은홍 wrote:
> 다시 답변 부탁드립니다.
>
> MDI를 써서 폼을 만들었습니다. main form 과 두개의 child form을요....
>
> 그런데 실행을 시키면 child form이 뜨기전에 이런 에러 메시지가 뜹니다..
>
> List index out of bounds(0) 라구요....
>
> 왜 이런 메시지가 뜨는지 꼭좀 빨리 알려주세요...
>
> 혹시 midchildren 때문인지...제 메인 소스를 띄웁니다...
>
> 뭐가 잘못되었는지 자세하게 알려주시면 감사....
>
> procedure TMAINF.psActFormClose;
> var
> I : ShortInt;
>
> begin
> if MDIChildCount > 1 then
> begin
> for I := MDIChildCount - 1 downto 0 do
> MDIChildren[I].Close;
> end;
> end;
>
> procedure TMAINF.N1Click(Sender: TObject);
> begin
> psActFormClose;
> TForm2.Create(Application);
> end;
>
>
> procedure TMAINF.N2Click(Sender: TObject);
> begin
> psActFormClose;
> TForm3.Create(Application);
> end;
>
>
>