Q&A
- 동적 생성한 컴포넌트 이벤트 처리
클라이언트소켓를 동적 생성하였는데요..
이벤트가 일어나질 않네요..
좀 자세히 좀.. 알려 주시길 바람니다...
procedure TForm3.CreateSock(Target: TForm; Num: integer; CName: String);
begin
G_ClientSocket[Num] := TClientSocket.Create(Self);
with G_ClientSocket[Num] do begin
parent:=Self;
Name:=CName;
OnConnect:=ClientSocket1Connect;
end;
end;
procedure TForm3.ClientSocket1Connect(Sender: TObject; Socket: TCustomWinSocket);
begin
Memo1.Lines.Add('1번 소켓 연결 성공..');
end;
위의 코드가 제가 클라이언트 소켓을 생성하고.. 이벤트를 만들어 준 것입니다..
소켓은 물론 서버에 붙어서.. 서버에서 접속 허가를 해 줍니다..
서버에서 접속허가를 하면.. OnConnect 이벤트가 일어나야 되는데...
일어나질 않는군요..
혹시 위의 코드중.. 잘못된 부분이나.. 아니면..
이럴땐.. 안된다는 조언이라도.. 검 답변 부탁드립니다.
이벤트가 일어나질 않네요..
좀 자세히 좀.. 알려 주시길 바람니다...
procedure TForm3.CreateSock(Target: TForm; Num: integer; CName: String);
begin
G_ClientSocket[Num] := TClientSocket.Create(Self);
with G_ClientSocket[Num] do begin
parent:=Self;
Name:=CName;
OnConnect:=ClientSocket1Connect;
end;
end;
procedure TForm3.ClientSocket1Connect(Sender: TObject; Socket: TCustomWinSocket);
begin
Memo1.Lines.Add('1번 소켓 연결 성공..');
end;
위의 코드가 제가 클라이언트 소켓을 생성하고.. 이벤트를 만들어 준 것입니다..
소켓은 물론 서버에 붙어서.. 서버에서 접속 허가를 해 줍니다..
서버에서 접속허가를 하면.. OnConnect 이벤트가 일어나야 되는데...
일어나질 않는군요..
혹시 위의 코드중.. 잘못된 부분이나.. 아니면..
이럴땐.. 안된다는 조언이라도.. 검 답변 부탁드립니다.
2
COMMENTS
-
-
델파초짜.. wrote:
> 클라이언트소켓를 동적 생성하였는데요..
> 이벤트가 일어나질 않네요..
>
> 좀 자세히 좀.. 알려 주시길 바람니다...
>
> procedure TForm3.CreateSock(Target: TForm; Num: integer; CName: String);
> begin
> G_ClientSocket[Num] := TClientSocket.Create(Self);
> with G_ClientSocket[Num] do begin
> parent:=Self;
> Name:=CName;
> OnConnect:=ClientSocket1Connect;
> end;
> end;
ip address 를 정해주고 Active := true 를 하셔야 하지요.
그외 OnError 프로시져도 정해주어야 하고...
>
> procedure TForm3.ClientSocket1Connect(Sender: TObject; Socket: TCustomWinSocket);
>
> begin
> Memo1.Lines.Add('1번 소켓 연결 성공..');
> end;
>
> 위의 코드가 제가 클라이언트 소켓을 생성하고.. 이벤트를 만들어 준 것입니다..
> 소켓은 물론 서버에 붙어서.. 서버에서 접속 허가를 해 줍니다..
> 서버에서 접속허가를 하면.. OnConnect 이벤트가 일어나야 되는데...
> 일어나질 않는군요..
> 혹시 위의 코드중.. 잘못된 부분이나.. 아니면..
> 이럴땐.. 안된다는 조언이라도.. 검 답변 부탁드립니다.
>
(NOTICE) You must be logged in to comment on this post.
-
- 델초보
- •
- 2001.02.28 18:50
- 1 COMMENTS
- /
- 0 LIKES
-
권민호•2001.02.28 18:55델초보 wrote: > 메모컴포넌트의 text를 오라클 long Type 컬럼에 Insert하려는데 > 자꾸만 라인이 삽입...
-
- 보라미
- •
- 2001.02.28 18:46
- 1 COMMENTS
- /
- 0 LIKES
-
TeamX•2001.02.28 23:42혹시나 SubType='mtHtml' 이 SubType='text/html' 로 하면 안될까요???. 아닌가??? -_- 보라미 wro...
-
- 초보
- •
- 2001.02.28 18:20
- 1 COMMENTS
- /
- 0 LIKES
-
공성환•2001.02.28 18:31where rownum 안녕하세요 > 언젠가 봤는데 쿼리를 오픈해서 위로부터 원하는 만큼 .... > > with Quer...
-
- 사발우성
- •
- 2001.02.28 08:17
- 2 COMMENTS
- /
- 0 LIKES
-
kylix•2001.02.28 14:21IndexOf메소드를 사용하시죠... Copy보다는 이게 낫습니다.... if ListBox2.Items.IndexOf(어떤아이템) ...
-
사발우성•2001.02.28 18:04kylix wrote: > IndexOf메소드를 사용하시죠... Copy보다는 이게 낫습니다.... > > if ListBox2.Items....
-
- 질문자
- 2001.02.28 08:12
- 0 COMMENTS
- /
- 0 LIKES
-
- 델피언77
- •
- 2001.02.28 07:11
- 1 COMMENTS
- /
- 0 LIKES
-
하얀까마귀•2001.02.28 11:08안녕하세요 하얀까마귀 입니다. 무슨 루틴인지 일부인것 같네요.. 아마도 jpeg.Assign(Image1.Pic...
-
- 처버처버
- •
- 2001.02.28 07:13
- 2 COMMENTS
- /
- 0 LIKES
-
방기남•2001.02.28 09:03var BTN: Array of TButton; procedure TForm1.FormCreate(Sender: TObject); begin SetLength(B...
-
kylix•2001.02.28 12:31근데요... 그렇게 배열을 선언해가지구 잡아주시면 FindComponent를 쓸필요가 없지 않을까요... 배열의 ...
-
- 홍문택
- 2001.02.28 07:00
- 0 COMMENTS
- /
- 0 LIKES
-
- ㅜㅜ
- 2001.02.28 06:54
- 0 COMMENTS
- /
- 0 LIKES
-
- 김춘성
- 2001.02.28 05:36
- 0 COMMENTS
- /
- 0 LIKES
-
-
- 제크
- •
- 2001.02.28 05:12
- 2 COMMENTS
- /
- 0 LIKES
-
kylix•2001.02.28 07:12> SaveDialog1.Execute; 이곳이 저장하는 곳인가요? 흠~~ 파일에 따른 저장 방법이 수천수만가지인데 ...
-
하얀까마귀•2001.02.28 11:14안녕하세요 하얀까마귀 입니다. if SaveDialog1.Execute then SaveDialog1.Execute; 이곳이 저장하는...
-
- 고광현
- •
- 2001.02.28 05:03
- 1 COMMENTS
- /
- 0 LIKES
-
바보감자•2001.02.28 05:28고광현 wrote: > 안녕하세요... > 한영키제어에 관한 질문입니다. > 델파이 2.0에서 자동으로 한글입력...
-
- 델파초짜..
- •
- 2001.02.28 04:33
- 2 COMMENTS
- /
- 0 LIKES
클라이언트소켓를 동적 생성하였는데요.. 이벤트가 일어나질 않네요.. 좀 자세히 좀.. 알려 주시길 바람니다... procedure TForm3.CreateSock(Target: TForm; Num: integer; CName: String); begin G_ClientSocket[Num] := TClientSocket....-
참고만•2001.02.28 06:59//아래코드가 다 입니껴? //동적 생성된 소켓에 서버로 연결은 하셨사옵니까? > G_ClientSocket[Num]...
-
jung hyun jin•2001.02.28 06:44델파초짜.. wrote: > 클라이언트소켓를 동적 생성하였는데요.. > 이벤트가 일어나질 않네요.. > > 좀...
-
- coco
- 2001.02.28 03:39
- 0 COMMENTS
- /
- 0 LIKES
-
- 장민우
- 2001.02.28 03:20
- 0 COMMENTS
- /
- 0 LIKES
-
- 김형식
- •
- 2001.02.28 02:59
- 1 COMMENTS
- /
- 0 LIKES
-
똘망울•2001.02.28 03:09배열에 클래스(객체)를 넣을때.. 배열도 같은 class type 이어야 합니다. 배열에 넣으면..배열 = 클래스 ...
-
- joajoa
- •
- 2001.03.04 01:01
- 1 COMMENTS
- /
- 0 LIKES
-
jung hyun jin•2001.03.04 01:01joajoa wrote: > > 타이틀이 나타나질 않습니다. > 왜 일까여? > 아주 예전에 이런 버그가 있었는데 ...
-
- 델피언
- •
- 2001.02.28 02:47
- 2 COMMENTS
- /
- 0 LIKES
-
jung hyun jin•2001.02.28 06:48델피언 wrote: > 안녕하세여~ > > 델파이3을 5로 업그레이드했더니만.. > 퀵레포트가 어떤건 정상으로...
-
델피언•2001.02.28 19:09답변 감사합니다. 꾸벅~ 나름대로 차이를 비교했더니 페이지헤더에 다이렉트로 작성된 레포트폼은 다 안...
-
- 김춘성
- •
- 2001.02.28 02:39
- 1 COMMENTS
- /
- 0 LIKES
-
똘망울•2001.02.28 03:04델파이 씨디에 인스톨 쉴드 같이 있어여. 김춘성 wrote: > > 안녕하세요... > 인스톨쉴드는 어디서 ...
//동적 생성된 소켓에 서버로 연결은 하셨사옵니까?
> G_ClientSocket[Num] := TClientSocket.Create(Self);
> with G_ClientSocket[Num] do begin
> parent:=Self;
> Name:=CName;
> OnConnect:=ClientSocket1Connect;
> Host := '127.0.0.1';
> Active := True;
> end;
델파초짜.. wrote:
> 클라이언트소켓를 동적 생성하였는데요..
> 이벤트가 일어나질 않네요..
>
> 좀 자세히 좀.. 알려 주시길 바람니다...
>
> procedure TForm3.CreateSock(Target: TForm; Num: integer; CName: String);
> begin
> G_ClientSocket[Num] := TClientSocket.Create(Self);
> with G_ClientSocket[Num] do begin
> parent:=Self;
> Name:=CName;
> OnConnect:=ClientSocket1Connect;
> end;
> end;
>
> procedure TForm3.ClientSocket1Connect(Sender: TObject; Socket: TCustomWinSocket);
>
> begin
> Memo1.Lines.Add('1번 소켓 연결 성공..');
> end;
>
> 위의 코드가 제가 클라이언트 소켓을 생성하고.. 이벤트를 만들어 준 것입니다..
> 소켓은 물론 서버에 붙어서.. 서버에서 접속 허가를 해 줍니다..
> 서버에서 접속허가를 하면.. OnConnect 이벤트가 일어나야 되는데...
> 일어나질 않는군요..
> 혹시 위의 코드중.. 잘못된 부분이나.. 아니면..
> 이럴땐.. 안된다는 조언이라도.. 검 답변 부탁드립니다.
>