Q&A
- 동적폼 생성...에 대하여 질문입니다..
안녕하세요..
염치불구 하고 또 질문을 올립니다..
main form 인 Form1 과 Form1에 버튼이 하나,라벨(Label1)이 하나 있습니다.
Label1의 Caption 은 'Form3'입니다.
그외에 Form2,Form3,Form4 ,가 있고요..
메인폼의 버튼을 누르면..라벨1의 caption을 읽어서..
폼2을 생성합니다...
중요한것은 라벨의 캡션이 Form3 가 될수도 있고,Form3이 될수 도 있습니다..
얼케 해야 되져..
즉 하고 싶은 일은
Form := TForm2.Create(self) 가 아니라
--> Form := Tlabel1.caption.Create(self)인데..
라벨 캡션은... 스트링이라서..
질문이 좀 황당하져..
얼케 해결 해야 할지 궁금하네요...
염치불구 하고 또 질문을 올립니다..
main form 인 Form1 과 Form1에 버튼이 하나,라벨(Label1)이 하나 있습니다.
Label1의 Caption 은 'Form3'입니다.
그외에 Form2,Form3,Form4 ,가 있고요..
메인폼의 버튼을 누르면..라벨1의 caption을 읽어서..
폼2을 생성합니다...
중요한것은 라벨의 캡션이 Form3 가 될수도 있고,Form3이 될수 도 있습니다..
얼케 해야 되져..
즉 하고 싶은 일은
Form := TForm2.Create(self) 가 아니라
--> Form := Tlabel1.caption.Create(self)인데..
라벨 캡션은... 스트링이라서..
질문이 좀 황당하져..
얼케 해결 해야 할지 궁금하네요...
2
COMMENTS
-
-
안녕하세요. 최용일입니다.
예전 집답 게시판에서 검색해보시면 있는데... 쩝~
메인폼의 OnCreate같은곳에서 아래와 같은 형식으로 클래스를 등록하시구요...
RegisterClass(TForm2);
RegisterClass(TForm3);
......
버튼의 OnClick이벤트에서 다음과 같이 하시면 됩니다.
procedure TForm1.Button2Click(Sender: TObject);
var
FormClass: TFormClass;
FormInstance: TForm;
begin
FormClass := TFormClass( GetClass('TForm3') );
FormInstance := FormClass.Create(nil);
FormInstance.Show;
end;
^^ 항상 즐코하세요...
(NOTICE) You must be logged in to comment on this post.
-
- 이은호
- •
- 2002.02.20 08:16
- 1 COMMENTS
- /
- 0 LIKES
-
이광수•2002.02.20 20:00제가 알기로는 try except를 쓰면 해당하는 에러에 대해서는 Application으로 가지 않는 것으로 압니다. ...
-
- 쨩
- •
- 2002.02.20 07:23
- 2 COMMENTS
- /
- 0 LIKES
안녕하세요.. 염치불구 하고 또 질문을 올립니다.. main form 인 Form1 과 Form1에 버튼이 하나,라벨(Label1)이 하나 있습니다. Label1의 Caption 은 'Form3'입니다. 그외에 Form2,Form3,Form4 ,가 있고요.. 메인폼의 버튼을 누르면..라벨...-
신강섭•2002.02.21 23:54Form := TForm2.Create(Self); Form.Caption := Label1.Caption;
-
최용일•2002.02.20 22:40안녕하세요. 최용일입니다. 예전 집답 게시판에서 검색해보시면 있는데... 쩝~ 메인폼의 OnCreate같...
-
- 김차영
- 2002.02.20 06:18
- 0 COMMENTS
- /
- 0 LIKES
-
- 김홍균
- 2002.02.20 04:11
- 0 COMMENTS
- /
- 0 LIKES
-
- 김영철
- •
- 2002.02.20 04:00
- 4 COMMENTS
- /
- 0 LIKES
-
양석용•2002.02.20 13:23그 소스에서 차라리 배째라 컴터야 난 클라이언트 소켓 죽어두 한개쓴다식으루 코딩 하신다면여... whi...
-
양석용•2002.02.20 13:12소스가 이상하네여 -_-'' for i:=0 to 5 do begin if i=0 then ...
-
보들레르•2002.02.20 04:30안녕하세요~ 구창민입니다. ClientSocket 의 이벤트 중에 OnConnected 인가? 하는 이벤트가 있을 겁... -
김영철•2002.02.20 05:04먼저 답변 감사드립니다 (__) onConnect 다음에 메세지를 작성하라는 뜻이신지요? 음.. connect ...
-
- 폭가
- •
- 2002.02.20 03:30
- 3 COMMENTS
- /
- 0 LIKES
-
양석용•2002.02.20 13:50혹시 이거 말씀하시는거 아뉘우? procedure TForm1.Button1Click(Sender: TObject); var &n...
-
폭가•2002.02.20 20:22님께서 답변해 놓으신것은 델파이로 작성된 별도의 프로그램에서 버튼 클릭시 실행해서 되는 거잖아요.....
-
최용일•2002.02.20 22:44안녕하세요. 최용일입니다. Context Menu Handler를 설치하시면 됩니다. 강좌란에 찾아보시면 이거 만들...
-
- 인범진
- •
- 2002.02.20 03:29
- 1 COMMENTS
- /
- 0 LIKES
-
보들레르•2002.02.20 04:26안녕하세요~~ 구창민입니다. 파일객체(TFileStream)를 열어 조금씩 잘라서(Seek) 그걸 파일로 저...
-
- 유재훈
- •
- 2002.02.20 02:26
- 1 COMMENTS
- /
- 0 LIKES
-
유재훈•2002.02.20 05:03get()해오면 실제 페이지에 프린트 아웃 해준거 외에... 공백, 탭 문자까지 딸려 오네요... 가져온 문...
-
- 김창훈
- 2002.02.20 02:12
- 0 COMMENTS
- /
- 0 LIKES
-
- 델피초짜
- •
- 2002.02.20 00:30
- 4 COMMENTS
- /
- 0 LIKES
-
허일학•2002.02.20 00:40음...그러니깐..요.. Project메뉴에서 Option을 선택하면 여러가지 탭들이 나오죠?..그죠? 그중에....
-
델피초짜•2002.02.20 00:47하하하하!!!!! 감사 합니다... 아이콘은 해결 했는데요... 그러면 exe 파일명은 바꿀수 없...
-
허일학•2002.02.20 00:53으~~ 글세요.... 그거는 저두 잘몰겠습니다... 제가 알고있는 범위내에서는 안되는걸루 알고있는데... ...
-
보들레르•2002.02.20 04:19안녕하세요? 구창민입니다. 간단해여..^_^; 팁란으로 달려가보세요. 올려두었습니다. 그럼~ 항상 즐...
-
- 나야나
- •
- 2002.02.19 23:42
- 1 COMMENTS
- /
- 0 LIKES
-
최용일•2002.02.20 23:16안녕하세요. 최용일입니다. TNMFTP.List메소드를 호출하셔서 OnListItem으로 들어오는 파일목록정보를 ...
-
- 푸른하늘
- •
- 2002.02.19 23:37
- 1 COMMENTS
- /
- 0 LIKES
-
최용일•2002.02.20 23:22안녕하세요. 최용일입니다. 그냥 이미지의 OnMouseDown에서 코딩하시면 될건데요... 마우스 좌표가 ...
-
- 김영재
- •
- 2002.02.19 21:56
- 4 COMMENTS
- /
- 0 LIKES
-
한주영•2002.02.20 02:53지금은 수정되었는지 모르겠군요. 예전에 시험해 보니 그리드상에서 한글을 입력하고 수정하는데 있어서 ...
-
한주영•2002.02.19 22:15
-
김영재•2002.02.19 22:22
-
최영근•2002.02.20 01:32안녕하세요 ? 퀀텀 그리드는 회사 홈페이지에서 주문을 해야 합니다. http://www.devexpress.com/order...
-
- 김정원
- •
- 2002.02.19 21:35
- 2 COMMENTS
- /
- 0 LIKES
-
김성원•2002.02.19 22:23안녕하세여 왕초보입니다. 음 아래의 내용을 보면 산수계산이 좀 틀린것 같네염. &...
-
김정원•2002.02.19 23:29정말 고맙습니다..^^ 많은 도움이 됐네요...
-
- 김동진
- •
- 2002.02.19 21:27
- 1 COMMENTS
- /
- 0 LIKES
-
성더기•2002.02.19 23:11var SqlStr : string; begin SqlStr := 'select * from ' + TblName; ...
-
- 오수목
- 2002.02.19 21:16
- 0 COMMENTS
- /
- 0 LIKES
-
- 박준영
- •
- 2002.02.19 21:09
- 2 COMMENTS
- /
- 0 LIKES
-
윤수아•2002.02.19 23:07근데 Tpos는 모죠? 글구 지금 버튼 이름이 Copy라고 되어 있나요? 이벤트 이름을 보니까 그런 것 같은데 ...
-
이성훈•2002.02.19 23:03반계 이성훈입니다. Temp[j...
-
- 한기만
- •
- 2002.02.19 20:55
- 1 COMMENTS
- /
- 0 LIKES
-
박상윤•2002.02.21 03:03direct show를 사용하셔서 바꾸심 됩니다. dspack이 자료실에 있을텐데.. 그거 설치하시고 예...
-
- FTT
- •
- 2002.02.19 20:47
- 2 COMMENTS
- /
- 0 LIKES
-
한하눌•2002.02.20 00:49폼에 ado콤포텝의 adoconnect 컴포넌트를 놓고 마우스오른쪽을누르고 edit connectstring을 선택합니다.&nb...
-
FTT•2002.02.20 03:32감사합니다 해결했어요 ^^ 너무 기쁩니다.. 그럼 즐프하시고 오늘하루 좋은일만 있으시길
-
- 김성중
- 2002.02.19 20:47
- 0 COMMENTS
- /
- 0 LIKES
Form := TForm2.Create(Self);
Form.Caption := Label1.Caption;