Q&A
- 트리뷰에서 Selectedindex를 임의로 정의하는 방법좀 가르쳐 주세요(무지 급해여)~
K := 100101;
Qry_Code.Close;
Qry_Code.ParamByName('A1').AsString := 'A01';
Qry_Code.Open;
while not Qry_Code.Eof do
begin
//인덱스가 0번째인 곳에 서브아이템을 증가한다
TreeView1.Items.AddChild(indextonode(0),Qry_CodeSc_Name.AsString);
//인덱스가 0번째인 곳에 SelectedIndex 를 지정
TreeView1.Selected.SelectedIndex := K; //*****에러부분*****//
K := k + 1;
Qry_Code.Next;
end;
function TS301QRF.indextonode(index:integer):TTreeNode; //루트로부터 index번째 노드 리턴
var
node:TTreeNode;
i:integer;
begin
node:=TreeView1.Items.GetFirstNode;// 첫번째 노드
for i:=0 to index-1 do
node:=node.getNextSibling;// 다음 노드
Result:=Node;
end;
//*******에러부분 보충설명***********
그 부분에서 제가 임의로 selectedindex를 증가할려구 하는데 잘 안 되네여..
방법이 있으면 좀 가르쳐 주세요...
부탁 합니다..
즐거운 하루 되세여^^~~~~~~~~~~~~~`
Qry_Code.Close;
Qry_Code.ParamByName('A1').AsString := 'A01';
Qry_Code.Open;
while not Qry_Code.Eof do
begin
//인덱스가 0번째인 곳에 서브아이템을 증가한다
TreeView1.Items.AddChild(indextonode(0),Qry_CodeSc_Name.AsString);
//인덱스가 0번째인 곳에 SelectedIndex 를 지정
TreeView1.Selected.SelectedIndex := K; //*****에러부분*****//
K := k + 1;
Qry_Code.Next;
end;
function TS301QRF.indextonode(index:integer):TTreeNode; //루트로부터 index번째 노드 리턴
var
node:TTreeNode;
i:integer;
begin
node:=TreeView1.Items.GetFirstNode;// 첫번째 노드
for i:=0 to index-1 do
node:=node.getNextSibling;// 다음 노드
Result:=Node;
end;
//*******에러부분 보충설명***********
그 부분에서 제가 임의로 selectedindex를 증가할려구 하는데 잘 안 되네여..
방법이 있으면 좀 가르쳐 주세요...
부탁 합니다..
즐거운 하루 되세여^^~~~~~~~~~~~~~`
2
COMMENTS
-
-
우희연 wrote:
> K := 100101;
> Qry_Code.Close;
> Qry_Code.ParamByName('A1').AsString := 'A01';
> Qry_Code.Open;
> while not Qry_Code.Eof do
> begin
>
> //인덱스가 0번째인 곳에 서브아이템을 증가한다
> TreeView1.Items.AddChild(indextonode(0),Qry_CodeSc_Name.AsString);
>
> //인덱스가 0번째인 곳에 SelectedIndex 를 지정
> TreeView1.Selected.SelectedIndex := K; //*****에러부분*****//
>
>
> K := k + 1;
>
> Qry_Code.Next;
> end;
>
>
> function TS301QRF.indextonode(index:integer):TTreeNode; //루트로부터 index번째 노드 리턴
> var
> node:TTreeNode;
> i:integer;
> begin
> node:=TreeView1.Items.GetFirstNode;// 첫번째 노드
> for i:=0 to index-1 do
> node:=node.getNextSibling;// 다음 노드
> Result:=Node;
> end;
>
>
> //*******에러부분 보충설명***********
> 그 부분에서 제가 임의로 selectedindex를 증가할려구 하는데 잘 안 되네여..
> 방법이 있으면 좀 가르쳐 주세요...
> 부탁 합니다..
>
> 즐거운 하루 되세여^^~~~~~~~~~~~~~`
지금 외부에 나와있어 델파이 도움말을 참조할 수 없기에 정확한 답변인지는 모르겠습니다.
발생하는 에러가 런타임에 발생하는지 컴파일때 발생하는지...
런타임에 발생한다면 선택된 노드가 nil이기 때문인 수 있습니다.
TreeView1.Selected는 현재 트리뷰에서 선택된 노드이므로 마우스로 클릭하여 선택하지 않았다면 노드값은 nil입니다.
> //아래와 같은 방법이 되는지 확인해 보시죠
> TreeView1.items[0].SelectedIndex := K;
그리고 Index번째 노드를 구하는 TS301QRF.indextonode(index:integer) 내용은 Loop를 이용하는 것이 비효율적이라는 생각이 드는군요.
Result := TreeView1.Items[Index];
로 바꾸어도 될 듯 싶은데 역시 도움말을 볼 수 없는 상황이라 확실하지는 않습니다.
(NOTICE) You must be logged in to comment on this post.
-
- 끄응~^^
- 2000.10.05 19:44
- 0 COMMENTS
- /
- 0 LIKES
-
- 박인영
- 2000.10.05 19:16
- 0 COMMENTS
- /
- 0 LIKES
-
- 전준형
- •
- 2000.10.05 18:01
- 1 COMMENTS
- /
- 0 LIKES
-
백근훈•2000.10.05 18:56전준형 wrote: > NMFTP 컴퍼넌트에서 ListItem 이란 이벤트가 있던데... > 이게 어떤 이벤트인지 알고 싶...
-
- 델파이초보
- •
- 2000.10.05 21:38
- 1 COMMENTS
- /
- 0 LIKES
-
백근훈•2000.10.05 18:37델파이초보 wrote: > 델파이 책을 보고 있는 parambyname에 설명이 없어서 궁금합니다...부탁합니다. ...
-
- 프로그래밍초보
- •
- 2000.10.05 13:01
- 1 COMMENTS
- /
- 0 LIKES
-
각시탈•2000.10.05 18:30프로그래밍초보 wrote: > 텍스트 파일의 내용을 검색하려고 합니다. > > 예) Edit1.text 에 "귀여운 여...
-
- 네트웍/통신초보
- •
- 2000.10.05 12:54
- 1 COMMENTS
- /
- 0 LIKES
-
백근훈•2000.10.05 19:22네트웍/통신초보 wrote: > 전 델파이로 프로그래밍하는것을 재밌어하는 프로그래밍 초보입니다. > 예를들...
-
- 이경수
- 2000.10.05 10:36
- 0 COMMENTS
- /
- 0 LIKES
-
- sonny
- •
- 2000.10.05 09:38
- 1 COMMENTS
- /
- 0 LIKES
-
백근훈•2000.10.05 18:25sonny wrote: > 안녕하셔요? > String Grid내에 출력된 문자의 Byte수를 > 구할려면 어떻게 해야되죠? ...
-
- 정진아
- •
- 2000.10.05 08:08
- 1 COMMENTS
- /
- 0 LIKES
-
김영대•2000.10.05 21:58정진아 wrote: > 움.. 컴퓨터를 옮겨.. 프로젝트와.. 테이블을.. 다운 받아.. > ODBC로.. 새로 다 잡아주...
-
- 송길수
- 2000.10.05 07:25
- 0 COMMENTS
- /
- 0 LIKES
-
- 걸음마
- •
- 2000.10.05 06:51
- 1 COMMENTS
- /
- 0 LIKES
-
조규춘•2000.10.05 13:39걸음마 wrote: > adobe 나 그림판에서 혹은 화면을 캡쳐한 정보는 클립보드로 들어 간다고 그러던데요 > ...
-
- delpo
- •
- 2000.10.05 05:44
- 1 COMMENTS
- /
- 0 LIKES
-
강인규•2000.10.05 08:40if trim(combobox1.text) = '' then showmessage('값을 넣으세염.'); 잠시 쉬시는게 좋을듯. ^-^; ...
-
- 김지명
- 2000.10.05 05:20
- 0 COMMENTS
- /
- 0 LIKES
-
- 코스모
- •
- 2000.10.05 05:00
- 1 COMMENTS
- /
- 0 LIKES
-
이영준•2001.02.03 04:59먼저..MSDE는 공짜가 아니구여...ACCESS,OFFICE 또는 V STUDIO를 사면 라이센스가 따라 오는 것이구여......
-
- 호짐
- •
- 2000.10.05 04:53
- 1 COMMENTS
- /
- 0 LIKES
-
병부잡이•2000.10.05 05:54스트링 그리드를 사용할 때는 TQuery 컴포넌트를 이용하여 SQL문을 사용합니다 SQL문 아시죠? 모르시면 어...
-
- 우희연
- •
- 2000.10.05 04:47
- 2 COMMENTS
- /
- 0 LIKES
K := 100101; Qry_Code.Close; Qry_Code.ParamByName('A1').AsString := 'A01'; Qry_Code.Open; while not Qry_Code.Eof do begin //인덱스가 0번째인 곳에 서브아이템을 증가한다 TreeView1.Items.AddChild(indextonode(0),Qry_CodeSc_Na...-
어린왕자•2000.10.05 18:08우희연 wrote: > K := 100101; > Qry_Code.Close; > Qry_Code.ParamByName('A1').AsString := 'A0...
-
신호성•2000.10.05 17:07우희연 wrote: > K := 100101; > Qry_Code.Close; > Qry_Code.ParamByName('A1').AsString := 'A0...
-
- coco
- 2000.10.05 04:30
- 0 COMMENTS
- /
- 0 LIKES
-
- 파이걸
- •
- 2000.10.05 03:32
- 2 COMMENTS
- /
- 0 LIKES
-
병부잡이•2000.10.05 06:00보니깐 값인거 같은데요 DeleteKey는 키를 지우는 겁니다(레지스트리 열어보면 왼쪽에 폴더로 있는거 있죠...
-
파이걸•2000.10.05 06:33고마워요~~ ^O^ 안그래도 자문자답하러 들어온건데... 네.. 아직 레지스트리에 대해서 몰랐어요.. 전 그...
-
- 이호형
- •
- 2000.10.05 03:23
- 1 COMMENTS
- /
- 0 LIKES
-
어린왕자•2000.10.05 03:31이호형 wrote: > 안녕하세요.. > > 어떤 명령을 서버로 보낼때 필요한 파라미터를 입력 받아 > 화면 D...
-
- 전한민
- 2000.10.05 03:19
- 0 COMMENTS
- /
- 0 LIKES
> K := 100101;
> Qry_Code.Close;
> Qry_Code.ParamByName('A1').AsString := 'A01';
> Qry_Code.Open;
> while not Qry_Code.Eof do
> begin
>
> //인덱스가 0번째인 곳에 서브아이템을 증가한다
> TreeView1.Items.AddChild(indextonode(0),Qry_CodeSc_Name.AsString);
>
> //인덱스가 0번째인 곳에 SelectedIndex 를 지정
> TreeView1.Selected.SelectedIndex := K; //*****에러부분*****//
>
>
> K := k + 1;
>
> Qry_Code.Next;
> end;
>
>
> function TS301QRF.indextonode(index:integer):TTreeNode; //루트로부터 index번째 노드 리턴
> var
> node:TTreeNode;
> i:integer;
> begin
> node:=TreeView1.Items.GetFirstNode;// 첫번째 노드
> for i:=0 to index-1 do
> node:=node.getNextSibling;// 다음 노드
> Result:=Node;
> end;
>
>
> //*******에러부분 보충설명***********
> 그 부분에서 제가 임의로 selectedindex를 증가할려구 하는데 잘 안 되네여..
> 방법이 있으면 좀 가르쳐 주세요...
> 부탁 합니다..
>
> 즐거운 하루 되세여^^~~~~~~~~~~~~~`
>
음..안녕하세요..영원한 델초보 어린왕자입니다..
저의 허접코드가 여기 있군여..T.T 저두 초보라서..
근데..
코드를 보니깐..
SelectedIndex가 의미가 없는거 같습니다...
목적이 루트로부터 첫번째노드에 계속 가지를 붙여주기만 하면 되는거 아닙니까?
글구 마지막에 노드를 Selected시켜주면 되구요..(꼭 Select해야하나염?)
> //인덱스가 0번째인 곳에 SelectedIndex 를 지정
> TreeView1.Selected.SelectedIndex := K; //*****에러부분*****//
>
>
> K := k + 1;
그래서 이부분은 거의 필요가 없을껍니다..
글구 Selectedindex는 imageindex와 같이 자주 쓰인다구 하는 군여..
저의 말이 맞나 모르겠습니다..
틀리거나 궁금한거 있으면...쪼금만 물어보셔요..