Q&A
- 새 procedure 생성시 값받는거 이렇게 하면 안되나요???
procedure TForm1.BitBtn1Click(Sender: TObject);
begin
personview(BitBtn1.Caption); <<--- 여기서 에러가 나요!!!
end;
procedure TForm1.BitBtn2Click(Sender: TObject);
begin
personview(BitBtn2.Caption);
end;
procedure TForm1.personview(var viewid : String);
begin
// viewid 에 해당하는 정보를 DB에서 읽어와 보여주는 코드...
end;
음.. 위와 같이.. 버튼 클릭시 해당 Caption을 변수에 보내서 작업시키고
싶은데..
값이 잘 안넘어 가고..
저기 위에 적어 놓은곳에서 에러가 납니다..
스트링 넘겨서 처리하는 procedure 저렇게 하는거 아닌가요???
begin
personview(BitBtn1.Caption); <<--- 여기서 에러가 나요!!!
end;
procedure TForm1.BitBtn2Click(Sender: TObject);
begin
personview(BitBtn2.Caption);
end;
procedure TForm1.personview(var viewid : String);
begin
// viewid 에 해당하는 정보를 DB에서 읽어와 보여주는 코드...
end;
음.. 위와 같이.. 버튼 클릭시 해당 Caption을 변수에 보내서 작업시키고
싶은데..
값이 잘 안넘어 가고..
저기 위에 적어 놓은곳에서 에러가 납니다..
스트링 넘겨서 처리하는 procedure 저렇게 하는거 아닌가요???
2
COMMENTS
-
-
프라퍼티는 var파라매터로 넘길수 없습니다...
PersionView에서 var를 빼시거나 BitBtn1.Caption을 변수에 저장해서
넘겨주시면 됩니다.
이수정 wrote:
> procedure TForm1.BitBtn1Click(Sender: TObject);
> begin
> personview(BitBtn1.Caption); <<--- 여기서 에러가 나요!!!
> end;
>
> procedure TForm1.BitBtn2Click(Sender: TObject);
> begin
> personview(BitBtn2.Caption);
> end;
>
> procedure TForm1.personview(var viewid : String);
> begin
> // viewid 에 해당하는 정보를 DB에서 읽어와 보여주는 코드...
> end;
>
>
>
> 음.. 위와 같이.. 버튼 클릭시 해당 Caption을 변수에 보내서 작업시키고
> 싶은데..
>
> 값이 잘 안넘어 가고..
>
> 저기 위에 적어 놓은곳에서 에러가 납니다..
>
> 스트링 넘겨서 처리하는 procedure 저렇게 하는거 아닌가요???
>
(NOTICE) You must be logged in to comment on this post.
-
- 김진호
- •
- 2000.03.31 00:48
- 2 COMMENTS
- /
- 0 LIKES
-
구창민•2000.03.31 01:39김진호 wrote: > Enumerated 타입에서 아무값도 넣어 주지 않을려면 어떻게 해야 하나요? > > 컴포넌트...
-
유수•2000.03.31 01:38열거형은 요소의 차례대로 값이 부여됩니다.(0부터..) 값의 범위를 갖는 Integer이라 보면되져. 그...
-
- 불타는 델파이
- •
- 2000.03.31 00:42
- 1 COMMENTS
- /
- 0 LIKES
-
구창민•2000.03.31 01:43불타는 델파이 wrote: > 안녕하세요. 항상 좋은 대답에 감사드립니다. > 지금 제가 드릴 질문은 퀵레포터...
-
- QUICK
- 2000.03.31 00:41
- 0 COMMENTS
- /
- 0 LIKES
-
- 김기용
- 2000.03.31 00:10
- 0 COMMENTS
- /
- 0 LIKES
-
- 홍재만
- 2000.03.30 23:57
- 0 COMMENTS
- /
- 0 LIKES
-
- 강정민
- 2000.03.30 23:27
- 0 COMMENTS
- /
- 0 LIKES
-
- 김초보
- •
- 2000.03.30 23:23
- 1 COMMENTS
- /
- 0 LIKES
-
최용일•2000.03.30 23:43아래 함수로 두 파일을 비교해 보세요... 그리고 기능이 먹통이 됐다는데 어떤 기능인지...? 아마도 ...
-
-
유수•2000.03.31 01:00마우스로도 됩니다. Option중 RangeSelect가 관계있습니다. 확인해 보세요. nambada wrote: > ...
-
-
- 김경태
- •
- 2000.03.30 21:55
- 1 COMMENTS
- /
- 0 LIKES
-
최용일•2000.03.30 22:25폼의 KeyPreview속성을 True로 하시고 OnKeyDown이벤트에서 Alt-F4를 무효화시키시 면 됩니다. procedu...
-
- 델파이을 하고픈 사람
- •
- 2000.03.30 21:49
- 1 COMMENTS
- /
- 0 LIKES
-
김영숙•2000.03.31 18:02델파이을 하고픈 사람 wrote: > 안녕하세요. > 제기 ibm OS/390(V2.5)의 DB2(V5.1)에 델파이5로 프로그램...
-
- 델파이을 하고픈 사람
- 2000.03.30 21:47
- 0 COMMENTS
- /
- 0 LIKES
-
- gh0st lee
- •
- 2000.03.30 21:31
- 1 COMMENTS
- /
- 0 LIKES
-
최석기•2000.03.30 22:36gh0st lee wrote: > 원래 1메가 정도하는 파일이 컴파일만 하면 350킬로바이트로 줄어들어요.... > 아마...
-
- 송수현
- •
- 2000.03.30 21:11
- 1 COMMENTS
- /
- 0 LIKES
-
유수•2000.03.31 00:54원하시는 것이 어떤 것인지 정확하게 알수 없지만, 실행프로그램과 db가 같은 폴더에 존재한다면, Data...
-
-
유수•2000.03.31 00:49먼저 같은 폼으로 쓸 폼을 디자인 합니다. 그 폼의 이름이 TForm2이고, 메인 폼이 TForm1이라면, ...
-
-
- 안영식
- •
- 2000.03.30 20:14
- 1 COMMENTS
- /
- 0 LIKES
-
최용일•2000.03.30 22:11아마도 이미지를 클릭했을때 메모의 OnExit이벤트를 처리하려고 하는것같은데... 이미지의 OnClick이벤...
-
- 이수정
- •
- 2000.03.30 19:53
- 2 COMMENTS
- /
- 0 LIKES
procedure TForm1.BitBtn1Click(Sender: TObject); begin personview(BitBtn1.Caption);-
문홍철•2000.03.30 22:31이수정 wrote: > procedure TForm1.BitBtn1Click(Sender: TObject); > begin > personview(BitBtn1.Ca...
-
최용일•2000.03.30 20:02프라퍼티는 var파라매터로 넘길수 없습니다... PersionView에서 var를 빼시거나 BitBtn1.Caption을 변수...
-
- 정형모
- •
- 2000.03.30 19:31
- 1 COMMENTS
- /
- 0 LIKES
-
공성환•2000.03.30 20:49정형모 wrote: > 먼저 답변에 감사드립니다... > 근데 DBGirdEH에는 FooterRowCount라는 프로퍼티도 없고...
-
- 최은정
- •
- 2000.03.30 19:29
- 2 COMMENTS
- /
- 0 LIKES
-
박성훈•2000.03.30 19:44최은정 wrote: > 델파이 초보자 입니다. > 페이지컨트롤의 탭이 여러개있을경우..(a,b,c,..); > a탭시트...
-
최석기•2000.03.30 19:43AllowChange를 사용하시면 될텐데요.. 입력값이 제대로 들어오지 않았을대는 AllowChange를 false로 만...
-
- 최연수
- •
- 2000.03.30 19:27
- 1 COMMENTS
- /
- 0 LIKES
-
최용일•2000.03.30 20:57가장 좋은 방법은 InputBox를 새롭게 만드시는 것입니다. 사실 InputBox라는게 다이얼로그폼에 에디트하나...
-
> procedure TForm1.BitBtn1Click(Sender: TObject);
> begin
> personview(BitBtn1.Caption); <<--- 여기서 에러가 나요!!!
> end;
>
> procedure TForm1.BitBtn2Click(Sender: TObject);
> begin
> personview(BitBtn2.Caption);
> end;
>
> procedure TForm1.personview(var viewid : String);
> begin
> // viewid 에 해당하는 정보를 DB에서 읽어와 보여주는 코드...
> end;
>
>
>
> 음.. 위와 같이.. 버튼 클릭시 해당 Caption을 변수에 보내서 작업시키고
> 싶은데..
>
> 값이 잘 안넘어 가고..
>
> 저기 위에 적어 놓은곳에서 에러가 납니다..
>
> 스트링 넘겨서 처리하는 procedure 저렇게 하는거 아닌가요???
>
객체를 넘겨주세요..
넘겨주는 객체가 TBitbtn 클래스 한종류이면
procedure TForm1.BitBtn2Click(Sender: TObject);
begin
1: personview(Sender);
2: personview(Sender as TBitBtn);
end;
1;
procedure TForm1.personview(Sender: TObject);
begin
// viewid 에 해당하는 정보를 DB에서 읽어와 보여주는 코드...
(Sender as TBitBtn).Caption := 걸과값; 또는
TBitbtn(Sender).Caption := 결과값으로 하시면 되고요
end;
2;
procedure TForm1.personview(Sender: TBitBtn);
begin
// viewid 에 해당하는 정보를 DB에서 읽어와 보여주는 코드...
Sender.Caption := 걸과값;
end;
위와 같이 두가지로 할수가 있고요 그외에 여러가지 방법이 있습니다.
예로 여가가지 객체를 넘겨받을때 1번을 응용하면 되고요..