Q&A
- StringGrid에 ComboBox를 넣긴 넣었는데 ...
StringGrid에 ComboBox를 넣긴 넣었는데 그 ComboBox에 item값을
넣어줄려니까 안되네요.
꼭 고수님들의 답변을 부탁드립니다.
소스는 다음과 같습니다.
procedure TForm1.Button2Click(Sender: TObject);
var y : integer;
begin
for y := 1 to stringgrid1.rowcount - 1 do
begin
StringGrid1.Objects[3, y] := TComboBox.Create(StringGrid1);
with TComboBox(StringGrid1.Objects[3, y]) do
begin
Parent := StringGrid1;
BoundsRect := StringGrid1.CellRect(3, y);
Width := StringGrid1.ColWidths[1];
Height := StringGrid1.RowHeights[1];
Style := csDropDownList;
ItemHeight := 10;
Items.Add('test'); //이렇게 해도 값이 안들어가네요....흑흑흑
end;
end;
end;
넣어줄려니까 안되네요.
꼭 고수님들의 답변을 부탁드립니다.
소스는 다음과 같습니다.
procedure TForm1.Button2Click(Sender: TObject);
var y : integer;
begin
for y := 1 to stringgrid1.rowcount - 1 do
begin
StringGrid1.Objects[3, y] := TComboBox.Create(StringGrid1);
with TComboBox(StringGrid1.Objects[3, y]) do
begin
Parent := StringGrid1;
BoundsRect := StringGrid1.CellRect(3, y);
Width := StringGrid1.ColWidths[1];
Height := StringGrid1.RowHeights[1];
Style := csDropDownList;
ItemHeight := 10;
Items.Add('test'); //이렇게 해도 값이 안들어가네요....흑흑흑
end;
end;
end;
4
COMMENTS
-
-
최용일님 답변에 감사합니다.
답변대로 할려고 다음과 같이 고쳤는데 잘안되네요
procedure TForm1.Button2Click(Sender: TObject);
var y : integer;
begin
for y := 1 to stringgrid1.rowcount - 1 do
begin
StringGrid1.Objects[3, y] := TComboBox.Create(Form1);
// StringGrid1를 Form1으로 바꿈
with TComboBox(StringGrid1.Objects[3, y]) do
begin
Parent := Form1; // StringGrid1를 Form1으로 바꿈
BoundsRect := StringGrid1.CellRect(3, y);
Width := StringGrid1.ColWidths[1];
Height := StringGrid1.RowHeights[1];
Style := csDropDownList;
ItemHeight := 10;
Items.Add('test');
end;
end;
end;
이렇게 고쳐서 실행하니까 "Control '' has no parent window"메시지가 뜨네요.
한번 더 조언부탁드립니다.
최용일 wrote:
> 안녕하세요. 최용일입니다.
>
> 콤보박스에 값이 들어가 졌네요... 단지 화면상에만 보이지 않을뿐입니다. 스트링그리드의 셀이 다시 그려지면서 펼쳐진 드랍다운리스트위에 다시 그려지기 때문입니다. 콤보박스의 Parent를 폼으로 해보세요... 위치도 약간씩 조정하시구요...
>
> ^^ 항상 즐코하세요...
>
> 시카고 wrote:
> > StringGrid에 ComboBox를 넣긴 넣었는데 그 ComboBox에 item값을
> > 넣어줄려니까 안되네요.
> > 꼭 고수님들의 답변을 부탁드립니다.
> > 소스는 다음과 같습니다.
> >
> > procedure TForm1.Button2Click(Sender: TObject);
> > var y : integer;
> > begin
> > for y := 1 to stringgrid1.rowcount - 1 do
> > begin
> >
> > StringGrid1.Objects[3, y] := TComboBox.Create(StringGrid1);
> > with TComboBox(StringGrid1.Objects[3, y]) do
> > begin
> >
> > Parent := StringGrid1;
> > BoundsRect := StringGrid1.CellRect(3, y);
> > Width := StringGrid1.ColWidths[1];
> > Height := StringGrid1.RowHeights[1];
> > Style := csDropDownList;
> > ItemHeight := 10;
> > Items.Add('test'); //이렇게 해도 값이 안들어가네요....흑흑흑
> >
> > end;
> > end;
> > end;
-
아래와 같이 하세요.
Parent := Self;
Form1과 같이 직접 참조하는 것은 피하세요...
시카고 wrote:
> 최용일님 답변에 감사합니다.
> 답변대로 할려고 다음과 같이 고쳤는데 잘안되네요
> procedure TForm1.Button2Click(Sender: TObject);
> var y : integer;
> begin
> for y := 1 to stringgrid1.rowcount - 1 do
> begin
>
> StringGrid1.Objects[3, y] := TComboBox.Create(Form1);
> // StringGrid1를 Form1으로 바꿈
> with TComboBox(StringGrid1.Objects[3, y]) do
> begin
>
> Parent := Form1; // StringGrid1를 Form1으로 바꿈
> BoundsRect := StringGrid1.CellRect(3, y);
> Width := StringGrid1.ColWidths[1];
> Height := StringGrid1.RowHeights[1];
> Style := csDropDownList;
> ItemHeight := 10;
> Items.Add('test');
>
> end;
> end;
> end;
>
> 이렇게 고쳐서 실행하니까 "Control '' has no parent window"메시지가 뜨네요.
> 한번 더 조언부탁드립니다.
>
>
>
>
>
> 최용일 wrote:
> > 안녕하세요. 최용일입니다.
> >
> > 콤보박스에 값이 들어가 졌네요... 단지 화면상에만 보이지 않을뿐입니다. 스트링그리드의 셀이 다시 그려지면서 펼쳐진 드랍다운리스트위에 다시 그려지기 때문입니다. 콤보박스의 Parent를 폼으로 해보세요... 위치도 약간씩 조정하시구요...
> >
> > ^^ 항상 즐코하세요...
> >
> > 시카고 wrote:
> > > StringGrid에 ComboBox를 넣긴 넣었는데 그 ComboBox에 item값을
> > > 넣어줄려니까 안되네요.
> > > 꼭 고수님들의 답변을 부탁드립니다.
> > > 소스는 다음과 같습니다.
> > >
> > > procedure TForm1.Button2Click(Sender: TObject);
> > > var y : integer;
> > > begin
> > > for y := 1 to stringgrid1.rowcount - 1 do
> > > begin
> > >
> > > StringGrid1.Objects[3, y] := TComboBox.Create(StringGrid1);
> > > with TComboBox(StringGrid1.Objects[3, y]) do
> > > begin
> > >
> > > Parent := StringGrid1;
> > > BoundsRect := StringGrid1.CellRect(3, y);
> > > Width := StringGrid1.ColWidths[1];
> > > Height := StringGrid1.RowHeights[1];
> > > Style := csDropDownList;
> > > ItemHeight := 10;
> > > Items.Add('test'); //이렇게 해도 값이 안들어가네요....흑흑흑
> > >
> > > end;
> > > end;
> > > end;
-
감사합니다.
덕분에 제대로 할 수 있게 되어서.....
다시 한번 고맙습니다.
(NOTICE) You must be logged in to comment on this post.
-
- 박철우
- 2001.04.03 20:40
- 0 COMMENTS
- /
- 0 LIKES
-
- 프린트
- •
- 2001.04.03 20:26
- 3 COMMENTS
- /
- 0 LIKES
-
감초•2001.04.03 20:53예. 그럴때는 ColumnHead 밴드의 BeforePrint이벤트를 사용하세요. 가령 다섯장에 한번씩 0.1mm을 올려...
-
프린트•2001.04.04 01:48답변 너무 감사합니다. 그런데 하나의 잡에서 프린트도중 용지변경이 가능할지 모르겠네요. 테...
-
감초•2001.04.04 10:25예. 그건 일단 프린터를 Generic 으로 설치해 주시고 ESC코드를 사용하시면 됩니다. 실제로 델피에 따라...
-
- 마시마로
- 2001.04.06 20:45
- 0 COMMENTS
- /
- 0 LIKES
-
- 시카고
- •
- 2001.04.03 19:50
- 4 COMMENTS
- /
- 0 LIKES
StringGrid에 ComboBox를 넣긴 넣었는데 그 ComboBox에 item값을 넣어줄려니까 안되네요. 꼭 고수님들의 답변을 부탁드립니다. 소스는 다음과 같습니다. procedure TForm1.Button2Click(Sender: TObject); var y : integer; begin for y :...-
최용일•2001.04.03 21:56안녕하세요. 최용일입니다. 콤보박스에 값이 들어가 졌네요... 단지 화면상에만 보이지 않을뿐입니다. ...
-
시카고•2001.04.04 03:13최용일님 답변에 감사합니다. 답변대로 할려고 다음과 같이 고쳤는데 잘안되네요 procedure TForm1.Butt...
-
최용일•2001.04.04 04:00아래와 같이 하세요. Parent := Self; Form1과 같이 직접 참조하는 것은 피하세요... 시카고 ...
-
시카고•2001.04.04 04:53감사합니다. 덕분에 제대로 할 수 있게 되어서..... 다시 한번 고맙습니다.
-
- 초보
- •
- 2001.04.04 01:48
- 1 COMMENTS
- /
- 0 LIKES
-
이경문•2001.04.08 10:48편법을 사용하면 됩니다. 예를 들어 서버URL이 http://www.homepage.com/test.html 이라 하면 클라이언...
-
- 이상수
- •
- 2001.04.03 19:30
- 1 COMMENTS
- /
- 0 LIKES
-
감초•2001.04.03 20:43최대 길이는 정확히는 알지 못하지만 일반적으로 최근에 나오는 Lazer Printer의 경우에는 빠른 전송속도때...
-
- 강동희
- •
- 2001.04.03 18:51
- 7 COMMENTS
- /
- 0 LIKES
-
감초•2001.04.03 20:51
-
이희정•2001.04.03 20:38
-
강동희•2001.04.03 23:23
-
이희정•2001.04.03 23:52
-
이희정•2001.04.04 02:45
-
강동희•2001.04.04 23:42
-
감초•2001.04.06 02:45
-
- 은진
- •
- 2001.04.03 11:14
- 1 COMMENTS
- /
- 0 LIKES
-
최용일•2001.04.03 22:21안녕하세요. 최용일입니다. DSP(http://delphi.icm.edu.pl/)에서 찾아보시면 있는데... 쩝~ 아래 사...
-
- 김정태
- •
- 2001.04.03 12:58
- 1 COMMENTS
- /
- 0 LIKES
-
류종택•2001.04.03 12:58같은 테이블이 열려있는 모든 프로그램 또는 콤포넌트를 닫고 다시 해보세요.. From 류.. 김정태 ...
-
- [초보맨]
- 2001.04.03 12:59
- 0 COMMENTS
- /
- 0 LIKES
-
- 허접푸케케
- 2001.04.03 06:59
- 0 COMMENTS
- /
- 0 LIKES
-
- 무니
- 2001.04.03 06:56
- 0 COMMENTS
- /
- 0 LIKES
-
- 당근감자
- •
- 2001.04.03 13:07
- 2 COMMENTS
- /
- 0 LIKES
-
Black}{ole•2001.04.03 23:29AdjustLineBreaks함수를 이용하면 됩니다. 자세한건 도움말 참고하세요. ^^; 그럼..20000.
-
류종택•2001.04.03 13:07윈도우즈에서는 한 줄을 먹이는 것이 #13#10 즉 아스키 코드 값으로 13번 10번 문자 두개를 사용합니다. ...
-
- 이진구
- •
- 2001.04.03 06:37
- 1 COMMENTS
- /
- 0 LIKES
-
류종택•2001.04.03 08:05윈도우즈는 리눅스나 유닉스와 달리 프로그램 내에서 루프만 돌아도 CPU 점유율이 높아져서 다른 프로그...
-
- sslee
- 2001.04.03 13:21
- 0 COMMENTS
- /
- 0 LIKES
-
- 손대지
- •
- 2001.04.03 07:17
- 1 COMMENTS
- /
- 0 LIKES
-
최용일•2001.04.03 22:02var PPT: PPoint; 손대지 wrote: > 다음과 같은 포인터를 api에서 사용하려고 하는데요, > 델파이...
-
- 강병윤
- 2001.04.03 05:54
- 0 COMMENTS
- /
- 0 LIKES
-
- 궁그미
- 2001.04.03 05:40
- 0 COMMENTS
- /
- 0 LIKES
-
- 조준현
- 2001.04.03 04:43
- 0 COMMENTS
- /
- 0 LIKES
-
- 궁금이
- •
- 2001.04.03 04:36
- 2 COMMENTS
- /
- 0 LIKES
-
궁금이•2001.04.03 21:00궁금이 wrote: > 제목처럼 1메가 정도 되는 파일을 다운로드하려고 하면 에러가 납니다. > 작은 파일은 ...
-
장지용•2001.06.30 00:40님 덕분에 문제가 해결되었네요. 수고하세요.
콤보박스에 값이 들어가 졌네요... 단지 화면상에만 보이지 않을뿐입니다. 스트링그리드의 셀이 다시 그려지면서 펼쳐진 드랍다운리스트위에 다시 그려지기 때문입니다. 콤보박스의 Parent를 폼으로 해보세요... 위치도 약간씩 조정하시구요...
^^ 항상 즐코하세요...
시카고 wrote:
> StringGrid에 ComboBox를 넣긴 넣었는데 그 ComboBox에 item값을
> 넣어줄려니까 안되네요.
> 꼭 고수님들의 답변을 부탁드립니다.
> 소스는 다음과 같습니다.
>
> procedure TForm1.Button2Click(Sender: TObject);
> var y : integer;
> begin
> for y := 1 to stringgrid1.rowcount - 1 do
> begin
>
> StringGrid1.Objects[3, y] := TComboBox.Create(StringGrid1);
> with TComboBox(StringGrid1.Objects[3, y]) do
> begin
>
> Parent := StringGrid1;
> BoundsRect := StringGrid1.CellRect(3, y);
> Width := StringGrid1.ColWidths[1];
> Height := StringGrid1.RowHeights[1];
> Style := csDropDownList;
> ItemHeight := 10;
> Items.Add('test'); //이렇게 해도 값이 안들어가네요....흑흑흑
>
> end;
> end;
> end;