Q&A

  • 프로시저 돌린후 델파이에서 값 받기
전 왕 델초 입니다.

프로시저를 선언한뒤

값을 받아야 되는데

이 프로시저가 제대로 된건지도 모르겠고...

답답하네요



갈켜주세여



// 프로시저

PROCEDURE TEST(TEC IN OUT RC) IS



BEGIN



OPEN TEC FOR

SELECT * FROM

STATUS;



END TEST;



델파이



With Proc do begin

ExecProc;



{요 다음에 값을 받으려면 어케 해야 되여...

도저히 몰겄네요

패키지로도 해보고, 펀션으로도 해보고, 프로시져로도 해 봤는데,



갈켜주세여}

end;









3  COMMENTS
  • Profile
    바보감자 2001.01.27 03:51
    나원참 wrote:

    > 전 왕 델초 입니다.

    > 프로시저를 선언한뒤

    > 값을 받아야 되는데

    > 이 프로시저가 제대로 된건지도 모르겠고...

    > 답답하네요

    >

    > 갈켜주세여

    >

    > // 프로시저

    > PROCEDURE TEST(TEC IN OUT RC) IS

    >

    > BEGIN

    >

    > OPEN TEC FOR

    > SELECT * FROM

    > STATUS;

    >

    > END TEST;

    >

    > 델파이

    >

    > With Proc do begin

    > ExecProc;

    >

    > {요 다음에 값을 받으려면 어케 해야 되여...

    > 도저히 몰겄네요

    > 패키지로도 해보고, 펀션으로도 해보고, 프로시져로도 해 봤는데,

    > 영

    > 갈켜주세여}

    > end;

    >

    >

    >

    >



    안냐세염...

    웅....그..함...수...는.....리턴 값이 없죠.?

    임의로 하나 만든다면 몰를까..^^;;;

    하나 예를 들어...간단히 ^^;;;



    function aaa(밥: string): string;

    begin



    //앞의 스트링은 밥(변수입력값.)타입을

    말하는거구... 뒤의 스트링은 리턴값의 타입이죠..^^;;

    이제 여기다가 실행하실 루틴을 쓰신후에...

    마지막 에....



    Result := 밥; //이건...똥입네다...(리턴값이죠 ^^)

    end;

    요러케 하믄여...그대로 온값이 리턴되겠죠...^^;;;

    특정 ++ 을 해주고 싶다던지 하면 저기에 ... 그 값을 대입한 변수를 넣으면 되구요..

    예를 들어.....

    이러케 해도 하나의 함수가 되죠.



    function aaa(A: integer): string;

    begin

    Result := inttostr(A*2);

    end;



    이해가셨는지...?

    inttostr 은 인티져(숫자형) 값을 문자형으로 변환...왜냐...

    리턴값은 위에 보면.. 문자형으로...선언이..^^;;(다 아시겠지만..걍...)

    그럼 즐코 하세여 좋은 답변이 되었으면 하네여 꾸벅...













  • Profile
    나원참 2001.01.27 05:53
    바보감자 wrote:

    > 나원참 wrote:

    > > 전 왕 델초 입니다.

    > > 프로시저를 선언한뒤

    > > 값을 받아야 되는데

    > > 이 프로시저가 제대로 된건지도 모르겠고...

    > > 답답하네요

    > >

    > > 갈켜주세여

    > >

    > > // 프로시저

    > > PROCEDURE TEST(TEC IN OUT RC) IS

    > >

    > > BEGIN

    > >

    > > OPEN TEC FOR

    > > SELECT * FROM

    > > STATUS;

    > >

    > > END TEST;

    > >

    > > 델파이

    > >

    > > With Proc do begin

    > > ExecProc;

    > >

    > > {요 다음에 값을 받으려면 어케 해야 되여...

    > > 도저히 몰겄네요

    > > 패키지로도 해보고, 펀션으로도 해보고, 프로시져로도 해 봤는데,

    > > 영

    > > 갈켜주세여}

    > > end;

    > >

    > >

    > >

    > >

    >

    > 안냐세염...

    > 웅....그..함...수...는.....리턴 값이 없죠.?

    > 임의로 하나 만든다면 몰를까..^^;;;

    > 하나 예를 들어...간단히 ^^;;;

    >

    > function aaa(밥: string): string;

    > begin

    >

    > //앞의 스트링은 밥(변수입력값.)타입을

    > 말하는거구... 뒤의 스트링은 리턴값의 타입이죠..^^;;

    > 이제 여기다가 실행하실 루틴을 쓰신후에...

    > 마지막 에....

    >

    > Result := 밥; //이건...똥입네다...(리턴값이죠 ^^)

    > end;

    > 요러케 하믄여...그대로 온값이 리턴되겠죠...^^;;;

    > 특정 ++ 을 해주고 싶다던지 하면 저기에 ... 그 값을 대입한 변수를 넣으면 되구요..

    > 예를 들어.....

    > 이러케 해도 하나의 함수가 되죠.

    >

    > function aaa(A: integer): string;

    > begin

    > Result := inttostr(A*2);

    > end;

    >

    > 이해가셨는지...?

    > inttostr 은 인티져(숫자형) 값을 문자형으로 변환...왜냐...

    > 리턴값은 위에 보면.. 문자형으로...선언이..^^;;(다 아시겠지만..걍...)

    > 그럼 즐코 하세여 좋은 답변이 되었으면 하네여 꾸벅...

    >

    저 위에 있는 프로시저는 델파이에 코딩한게 아니라

    오라클에 코딩한거에여

    델파이에서 오라클 프로시저를 호출해서 값 받는걸 물어본건데

  • Profile
    나그네 2001.01.27 06:24
    글쿤요...

    With Proc do begin

    Prepare;

    ParambyName('TEC').AsString = '인자값넣기';

    ExecProc;

    Caption := ParambyName('TEC').AsString; // 인자값받기

    end;

    타입이 뭔지몰라 String이란 가정하에요...



    나원참 wrote:

    > 바보감자 wrote:

    > > 나원참 wrote:

    > > > 전 왕 델초 입니다.

    > > > 프로시저를 선언한뒤

    > > > 값을 받아야 되는데

    > > > 이 프로시저가 제대로 된건지도 모르겠고...

    > > > 답답하네요

    > > >

    > > > 갈켜주세여

    > > >

    > > > // 프로시저

    > > > PROCEDURE TEST(TEC IN OUT RC) IS

    > > >

    > > > BEGIN

    > > >

    > > > OPEN TEC FOR

    > > > SELECT * FROM

    > > > STATUS;

    > > >

    > > > END TEST;

    > > >

    > > > 델파이

    > > >

    > > > With Proc do begin

    > > > ExecProc;

    > > >

    > > > {요 다음에 값을 받으려면 어케 해야 되여...

    > > > 도저히 몰겄네요

    > > > 패키지로도 해보고, 펀션으로도 해보고, 프로시져로도 해 봤는데,

    > > > 영

    > > > 갈켜주세여}

    > > > end;

    > > >

    > > >

    > > >

    > > >

    > >

    > > 안냐세염...

    > > 웅....그..함...수...는.....리턴 값이 없죠.?

    > > 임의로 하나 만든다면 몰를까..^^;;;

    > > 하나 예를 들어...간단히 ^^;;;

    > >

    > > function aaa(밥: string): string;

    > > begin

    > >

    > > //앞의 스트링은 밥(변수입력값.)타입을

    > > 말하는거구... 뒤의 스트링은 리턴값의 타입이죠..^^;;

    > > 이제 여기다가 실행하실 루틴을 쓰신후에...

    > > 마지막 에....

    > >

    > > Result := 밥; //이건...똥입네다...(리턴값이죠 ^^)

    > > end;

    > > 요러케 하믄여...그대로 온값이 리턴되겠죠...^^;;;

    > > 특정 ++ 을 해주고 싶다던지 하면 저기에 ... 그 값을 대입한 변수를 넣으면 되구요..

    > > 예를 들어.....

    > > 이러케 해도 하나의 함수가 되죠.

    > >

    > > function aaa(A: integer): string;

    > > begin

    > > Result := inttostr(A*2);

    > > end;

    > >

    > > 이해가셨는지...?

    > > inttostr 은 인티져(숫자형) 값을 문자형으로 변환...왜냐...

    > > 리턴값은 위에 보면.. 문자형으로...선언이..^^;;(다 아시겠지만..걍...)

    > > 그럼 즐코 하세여 좋은 답변이 되었으면 하네여 꾸벅...

    > >

    > 저 위에 있는 프로시저는 델파이에 코딩한게 아니라

    > 오라클에 코딩한거에여

    > 델파이에서 오라클 프로시저를 호출해서 값 받는걸 물어본건데

    • 송길수
    • 2001.01.27 05:11
    • 4 COMMENTS
    • /
    • 0 LIKES
    • 김광섭
      2001.01.27 22:38
      송길수 wrote: > 특정한 프로그램 소스를 불러서 수정을 하려 했더니.... > > Objct Inspector(F11누르...
    • 최용일
      2001.01.27 05:17
      안녕하세요. 최용일입니다. 안보이시면 F11누르면 나옵니다. 아님 메뉴에서 불러오셔두 되구요... 프...
    • 송길수
      2001.01.27 18:56
      최용일 wrote: 최용일님의 글은 잘 읽었지만... F11키를 눌러 보아도 안나오고.... 다시 실행을 시...
    • 최용일
      2001.01.30 09:47
      안녕하세요. 최용일입니다. 델파이 Bin폴더에 보시면 delphi32.dsk란 파일이 있습니다. 이걸 편집하시면...
    • 최용일
      2001.01.27 05:12
      안녕하세요. 최용일입니다. 에디트의 OnKeyDown이벤트나 OnKeyPress이벤트같은곳에다 코딩하면 알수 있...
    • 뻐록이
      2001.01.27 05:07
      바보감자 wrote: > 안녕하세여... > 말그대로입니다... > 예를 들어...에디트1에서 엔터 치면말이죠... ...
    • onlydel
      2001.01.29 05:19
      내폼위에 Word를 가져오고 싶다면 OleContainer를 사용하시는게 좋겠군요. 우선 폼위에 OleContainer를 올...
    • lsb
    • 2001.01.27 03:38
    • 0 COMMENTS
    • /
    • 0 LIKES
    • 방경주
      2001.01.27 10:01
      두 디비가 같이 들어 있다면 같은 알리아스 상에 존재하는 것인가여? 구럼 간단하지 않은가? Select ...
    • 바보감자
      2001.01.27 18:37
      방경주 wrote: > 두 디비가 같이 들어 있다면 같은 알리아스 상에 존재하는 것인가여? > > 구럼 간단하...
    • cico
    • 2001.01.27 03:01
    • 3 COMMENTS
    • /
    • 0 LIKES
    • 바보감자
      2001.01.27 03:33
      cico wrote: > procedure 와 function의 정확한 차이점이 궁금하군여... > > 글구 const는 어떨때 사용...
    • cico
      2001.01.27 11:29
      바보감자 wrote: > cico wrote: > > procedure 와 function의 정확한 차이점이 궁금하군여... > > > >...
    • 바보감자
      2001.01.27 19:43
      cico wrote: > 바보감자 wrote: > > cico wrote: > > > procedure 와 function의 정확한 차이점이 궁금...
    • 최용일
      2001.01.27 05:01
      안녕하세요. 최용일입니다. 에러 내용을 보면 크기 제한하고는 상관이 없는거 같군요... PACK_START_...
    • Mpeg2 maker
      2001.01.27 17:27
      같은 유닛에 지정된 상수인데요... 제가 그 부분만 가지고 3일째 헤매고 있습니다. const문에 정의된 P...
    • 나원참
    • 2001.01.27 02:51
    • 3 COMMENTS
    • /
    • 0 LIKES
    • 바보감자
      2001.01.27 03:51
      나원참 wrote: > 전 왕 델초 입니다. > 프로시저를 선언한뒤 > 값을 받아야 되는데 > 이 프로시저가 제...
    • 나원참
      2001.01.27 05:53
      바보감자 wrote: > 나원참 wrote: > > 전 왕 델초 입니다. > > 프로시저를 선언한뒤 > > 값을 받아야 ...
    • 나그네
      2001.01.27 06:24
      글쿤요... With Proc do begin Prepare; ParambyName('TEC').AsString = '인자값넣기'; ExecProc...
    • 왕초보
    • 2001.01.27 02:08
    • 1 COMMENTS
    • /
    • 0 LIKES
    • 권영길
      2001.01.27 02:40
      project->option->packages->indy제거.. tools->environment->library->directory제거 왕초보 wrote: ...
    • 김범수
    • 2001.01.27 02:06
    • 1 COMMENTS
    • /
    • 0 LIKES
    • 바보감자
      2001.01.27 03:52
      김범수 wrote: > dbgrid을 세로로 출력하는 방법은 없나요. > 조언 부탁합니다. 저두 해결 방법은 ...
    • 이승근
    • 2001.01.27 00:18
    • 2 COMMENTS
    • /
    • 0 LIKES
    • 바보감자
      2001.01.27 03:58
      이승근 wrote: > 그리고, 혹시 dbgrid에서 특정 field에 입력하면 그 값을 체크하여 어떤 결과값을 줄수있...
    • 이승근
      2001.01.27 19:02
      바보감자 wrote: > 이승근 wrote: > > 그리고, 혹시 dbgrid에서 특정 field에 입력하면 그 값을 체크하여...
    • 뿌요
      2001.01.31 19:12
      edit3의 exit event나 keypress event에서 쿼리실행시킨다.. with query do begin Close; S...
    • 바보감자
      2001.01.27 04:00
      권세용 wrote: > 안녕하세요... 제가 워낙 무능력해서.. 이렇게 도움을 부탁드립니다. > > edit box에 ...