Q&A
- 소스 보시고 좀 고쳐 주세요..
안녕하십니까.
procedure TForm1.Edit3KeyPress(Sender: TObject; var Key: Char);
var
SN: Integer;
begin
SN := Edit3.GetTextLen;
if SN > 0 then begin
ShowMessage('영문자 1자리만' + #13 + #10 + '입력하세요');
Key := #0;
Edit3.Clear;
Edit3.SetFocus;
end;
end;
procedure TForm1.Edit3Exit(Sender: TObject);
begin
Form1.Edit3KeyPress(Edit3, #0); // 이 부분에서 에러가 으...
end;
에러 내용은 아래와 같습니다.
Types of actual and formal var parameters must be identical
Edit3KeyPress 프로시져를 어떻게 하면 부를수 있나요. 도사님 한 말씀.
감사합니다.
procedure TForm1.Edit3KeyPress(Sender: TObject; var Key: Char);
var
SN: Integer;
begin
SN := Edit3.GetTextLen;
if SN > 0 then begin
ShowMessage('영문자 1자리만' + #13 + #10 + '입력하세요');
Key := #0;
Edit3.Clear;
Edit3.SetFocus;
end;
end;
procedure TForm1.Edit3Exit(Sender: TObject);
begin
Form1.Edit3KeyPress(Edit3, #0); // 이 부분에서 에러가 으...
end;
에러 내용은 아래와 같습니다.
Types of actual and formal var parameters must be identical
Edit3KeyPress 프로시져를 어떻게 하면 부를수 있나요. 도사님 한 말씀.
감사합니다.
1
COMMENTS
(NOTICE) You must be logged in to comment on this post.
-
- 델초보
- 1999.11.05 00:57
- 0 COMMENTS
- /
- 0 LIKES
-
- 유희정
- •
- 1999.11.05 00:12
- 1 COMMENTS
- /
- 0 LIKES
-
최진석•1999.11.05 19:15안녕하세요.. 질문의 요지를 제대로 파악은 못했지만 그냥 답변 적습니다 제나름대로 Query.ApplyUpdates...
-
- 최진석
- •
- 1999.11.05 00:01
- 1 COMMENTS
- /
- 0 LIKES
-
이성찬•1999.11.05 23:51최진석 wrote: > 안녕하세요... > 파라독스 테이블에서 기존의 DB파일에 > 데이타베이스데스크톱을 이용...
-
- mildshin
- •
- 1999.11.04 23:53
- 1 COMMENTS
- /
- 0 LIKES
-
전철호•1999.11.05 04:15mildshin wrote: > 읽어주셔서 감샤합니다..답변까지 해주신다면 무지 고맙겠죠? 히히 > 다른게 아니라 ...
-
- 진정은
- •
- 1999.11.04 23:26
- 2 COMMENTS
- /
- 0 LIKES
-
나나•1999.11.05 02:15var ADate : TDateTime; begin try ADate := StrToDate(copy(edit1.text,1,4)+DateSep...
-
진정은•1999.11.05 02:09진정은 wrote: > 델파이의 TDateTime 형의 자료표시형식이 > 시스템설정-국가별설정을 기준으로 그 형식...
-
- mildshin
- •
- 1999.11.04 22:33
- 2 COMMENTS
- /
- 0 LIKES
-
권오경•1999.11.05 21:45mildshin wrote: > 제목이 좀 이상하지만 ...쩝.. > 다른게 아니라 MDI형식을 만들었는데 프로그램 시작...
-
오세웅•1999.11.04 22:46mildshin wrote: > 제목이 좀 이상하지만 ...쩝.. > 다른게 아니라 MDI형식을 만들었는데 프로그램 시작...
-
- 최인창
- 1999.11.04 22:23
- 0 COMMENTS
- /
- 0 LIKES
-
- hopeship
- •
- 1999.11.04 22:21
- 1 COMMENTS
- /
- 0 LIKES
안녕하십니까. procedure TForm1.Edit3KeyPress(Sender: TObject; var Key: Char); var SN: Integer; begin SN := Edit3.GetTextLen; if SN > 0 then begin ShowMessage('영문자 1자리만' + #13 + #10 + '입력하세요'); Key := #0; Edit3....-
TeamX•1999.11.04 22:44procedure TForm1.Edit3Exit(Sender: TObject); var key: Char; begin Form1.Edit3KeyPress(Edit3,...
-
- 방통선생
- •
- 1999.11.04 21:58
- 1 COMMENTS
- /
- 0 LIKES
-
이주흥•1999.11.05 07:49방통선생 wrote: > 채팅 프로그램을 델파이를 가지고 만듭니다... > 근데 진행중에 문제가 생겼습니다......
-
-
이만준•1999.11.05 17:26안녕하세요... 잘 안되나 보군요.... 채팅예제가 샘플로 있는데...아주 간단하거든요... 쓰신 코드...
-
-
-
TeamX•1999.11.04 20:57안녕하세요. 아래의 답변이 정학한것인지 모르겠습니다. function HlinkNavigateString(pUnk: IUnknown;...
-
-
-
이주흥•1999.11.04 21:41salguji wrote: > 안녕하세요.. > 퀵 레포트로 간단한 양식 하나 만들려구 하거던요.. > 첨 하는 것이라...
-
-
- 황선희
- •
- 1999.11.04 20:39
- 4 COMMENTS
- /
- 0 LIKES
-
강명지•1999.11.05 02:11황선희 wrote: > > 윈도우즈 엔티에다 웹서버를 구축하고, > > 델파이에서 Web Server Application ...
-
강명지•1999.11.05 02:10황선희 wrote: > > 윈도우즈 엔티에다 웹서버를 구축하고, > > 델파이에서 Web Server Application ...
-
홍민형•1999.11.05 01:06황선희 wrote: > > 윈도우즈 엔티에다 웹서버를 구축하고, > > 델파이에서 Web Server Application ...
-
황선희•1999.11.05 01:48홍민형 wrote: > 황선희 wrote: > > > > 윈도우즈 엔티에다 웹서버를 구축하고, > > > > 델파이에서...
-
- 문영미
- •
- 1999.11.04 20:15
- 3 COMMENTS
- /
- 0 LIKES
-
오세웅•1999.11.04 20:41문영미 wrote: > 안녕하세요! 꾸우뻑. > > 프로그래밍을 하다 궁금한 것이 있어 글을 올립니다. > 다...
-
오세웅•1999.11.04 22:53오세웅 wrote: > 문영미 wrote: > > 안녕하세요! 꾸우뻑. > > > > 프로그래밍을 하다 궁금한 것이 있...
-
문영미•1999.11.04 23:32우선, 답변해 주셔서 감사합니다. 글고, 이정태씨는 잘 지내고 있답니다.(전적으로 제가 보기엔) 제가 ...
-
- 델초보
- •
- 1999.11.04 19:59
- 1 COMMENTS
- /
- 0 LIKES
-
TeamX•1999.11.04 20:44제가 잘은 모르지만 ScaleBy? 인가 하는 함수를 써보시죠.( 화면해상도의 비율을 구해서...... -.-;;) ...
-
- hopeship
- •
- 1999.11.04 19:44
- 1 COMMENTS
- /
- 0 LIKES
-
권오경•1999.11.05 21:53hopeship wrote: > 안녕하십니까. > 기본적인 질문이긴 합니다만. 그래도 궁금하여 질문하고자 합니다. ...
-
- 최진석
- •
- 1999.11.04 19:04
- 1 COMMENTS
- /
- 0 LIKES
-
조복기•1999.11.04 19:53안녕하세요.. 실행시에 테이블을 만들어본적이 없어서 헬프를 봤더니 'Number'라고 하지않고 'NUMERI...
-
- aha
- •
- 1999.11.04 18:35
- 1 COMMENTS
- /
- 0 LIKES
-
최진석•1999.11.04 18:38aha wrote: > 읽어 주셔서 감사합니다(꾸뻑.. ) > > 현재 실행화일이 있는 곳의 데이터 베이스 화일을 ...
-
- 황현동
- 1999.11.04 13:54
- 0 COMMENTS
- /
- 0 LIKES
-
- 최진희
- 1999.11.04 13:29
- 0 COMMENTS
- /
- 0 LIKES
var
key: Char;
begin
Form1.Edit3KeyPress(Edit3, key);
end;
var 로 정의 되어져 있는 파라미터에는 스택에 포인터가 넘어갑니다. 즉 어떤 변수의 주소를 요구하는 파라미터를 지정할때 var 로 정의하죠.
델파이는 포인터를 참 쉽게(?) 다루게 하죠..... -.-;;
hopeship wrote:
> 안녕하십니까.
>
> procedure TForm1.Edit3KeyPress(Sender: TObject; var Key: Char);
> var
> SN: Integer;
> begin
> SN := Edit3.GetTextLen;
> if SN > 0 then begin
> ShowMessage('영문자 1자리만' + #13 + #10 + '입력하세요');
> Key := #0;
> Edit3.Clear;
> Edit3.SetFocus;
> end;
> end;
>
> procedure TForm1.Edit3Exit(Sender: TObject);
> begin
> Form1.Edit3KeyPress(Edit3, #0); // 이 부분에서 에러가 으...
> end;
>
> 에러 내용은 아래와 같습니다.
>
> Types of actual and formal var parameters must be identical
>
> Edit3KeyPress 프로시져를 어떻게 하면 부를수 있나요. 도사님 한 말씀.
> 감사합니다.
>
>