Q&A
- memo 필드 이거... 부탁 해요.ㅜㅜ
--------------------- 입력 프로시저 구여
CREATE PROCEDURE INS_MEMO (
PNAME VARCHAR(15),
PMEMO BLOB SUB_TYPE 1 SEGMENT SIZE 80
) AS
begin
insert into memotest(name, memo) values(:PNAME,:Pmemo);
suspend;
end
--------------------- 리턴 되는 프로시저
CREATE PROCEDURE RE_MEMO (
PNAME VARCHAR(15)
) RETURNS (
MEMO BLOB SUB_TYPE 1 SEGMENT SIZE 80
) AS
begin
select memo from memotest where name = :pname
into :memo;
suspend;
end
--------------------------
procedure TForm1.Button1Click(Sender: TObject); /*이건 입력*/
begin
with ibstoredproc1 do
begin
params.clear;
storedprocname :='ins_memo';
prepare;
params[0].AsString := edit1.text;
params[1].asmemo := memo1.Text;
execproc;
unprepare;
end;
end; /* 이리 입력 하면.. 디비익스플로러에서 메모 입력 내용을 확인 할수
있어여..m^.^m 근디 ㅡㅡ; */
-------------------------------
procedure TForm1.Button2Click(Sender: TObject);
begin
with ibstoredproc1 do
begin
params.Clear;
storedprocname := 're_memo';
prepare;
params[1].AsString := edit2.Text;
execproc;
★→ memo2.Text := params[0].AsMemo;
unprepare;
end;
end; /* 이렇게 하면.. MEMO2에 "(BLOB)" 라구 만나와여 다른건
돠되여.. 이것 만.ㅡㅡ; */
여기서 MEMO2.LINES.ADD(PARAMS[0].ASMEMO) 등등.. 초보 머리에서 나올수 있는건
다 했는디 ㅡㅡ; 역쉬.. 히히 안되여..
부탁 해여..
참고 // interbase6.1이구여. database dialect 3 여여
CREATE PROCEDURE INS_MEMO (
PNAME VARCHAR(15),
PMEMO BLOB SUB_TYPE 1 SEGMENT SIZE 80
) AS
begin
insert into memotest(name, memo) values(:PNAME,:Pmemo);
suspend;
end
--------------------- 리턴 되는 프로시저
CREATE PROCEDURE RE_MEMO (
PNAME VARCHAR(15)
) RETURNS (
MEMO BLOB SUB_TYPE 1 SEGMENT SIZE 80
) AS
begin
select memo from memotest where name = :pname
into :memo;
suspend;
end
--------------------------
procedure TForm1.Button1Click(Sender: TObject); /*이건 입력*/
begin
with ibstoredproc1 do
begin
params.clear;
storedprocname :='ins_memo';
prepare;
params[0].AsString := edit1.text;
params[1].asmemo := memo1.Text;
execproc;
unprepare;
end;
end; /* 이리 입력 하면.. 디비익스플로러에서 메모 입력 내용을 확인 할수
있어여..m^.^m 근디 ㅡㅡ; */
-------------------------------
procedure TForm1.Button2Click(Sender: TObject);
begin
with ibstoredproc1 do
begin
params.Clear;
storedprocname := 're_memo';
prepare;
params[1].AsString := edit2.Text;
execproc;
★→ memo2.Text := params[0].AsMemo;
unprepare;
end;
end; /* 이렇게 하면.. MEMO2에 "(BLOB)" 라구 만나와여 다른건
돠되여.. 이것 만.ㅡㅡ; */
여기서 MEMO2.LINES.ADD(PARAMS[0].ASMEMO) 등등.. 초보 머리에서 나올수 있는건
다 했는디 ㅡㅡ; 역쉬.. 히히 안되여..
부탁 해여..
참고 // interbase6.1이구여. database dialect 3 여여
1
COMMENTS
(NOTICE) You must be logged in to comment on this post.
-
- sonwow
- •
- 2001.03.05 23:52
- 1 COMMENTS
- /
- 0 LIKES
-
명탁•2001.03.06 17:53sonwow wrote: > null값을 0로 만드는 함수는 없나요, > isnull 과 같은 거말입니다. 첨 테이블 맹글때 ...
-
- 이영근
- 2001.03.05 23:45
- 0 COMMENTS
- /
- 0 LIKES
-
- 델초보
- 2001.03.05 23:24
- 0 COMMENTS
- /
- 0 LIKES
-
- 김종건
- •
- 2001.03.05 23:18
- 4 COMMENTS
- /
- 0 LIKES
-
공성환•2001.03.06 00:13오라클의 로더기능을 사용해보시지요... 그리고 클라이언트에서 작업을 하는것보다는 서버에서 작업하는게...
-
이진수•2001.03.05 23:26음... 제가 알기론 한꺼번에 업데이트 할 수 있는 것이 가능하고 이것을 가능하게 위해서는 CachedUpdate...
-
김종건•2001.03.06 02:52cachedupdate를 사용하는 방법에 대해서 좀 가르쳐 주세요.. help를 봐두 잘 모르겠어요.. 부탁드립니다....
-
이진수•2001.03.06 06:44예제입니다. Help에 있는 예제입니다. procedure TForm1.ApplyButtonClick(Sender: TObject); begin...
-
- 박상진
- •
- 2001.03.05 22:30
- 2 COMMENTS
- /
- 0 LIKES
-
방경주•2001.03.06 06:20그럴리가 없을텐데여....^^ 델파이시디에 보시면 인스톨쉴드가 있을겁니다.. 그걸 인스톨 하시구여 ...
-
박상진•2001.03.06 23:19우선 답변에 감사드립니다. 물론 BDE는 제대로 설치 했고요.. 인스톨쉴드도 해 보았습니다... StoredP...
-
- 배준영
- •
- 2001.03.05 22:27
- 1 COMMENTS
- /
- 0 LIKES
-
sonwow•2001.03.05 23:56recordcount를 써보심이 아니면, grid.row 값도 괜찮은데요,, 참, 인터베이스 쓰시나본데요, null값을 0...
-
- 이원택
- 2001.03.05 21:40
- 0 COMMENTS
- /
- 0 LIKES
-
- 써니
- 2001.03.05 21:33
- 0 COMMENTS
- /
- 0 LIKES
-
- 김명일
- •
- 2001.03.05 21:31
- 1 COMMENTS
- /
- 0 LIKES
-
모름이•2001.03.05 23:42김명일 wrote: > sellexecute(..,mailto:)-- 이런 식으로 하면 메일 보내기 창이 뜨는데요.. > > 제가...
-
- 급해여~
- •
- 2001.03.05 20:49
- 1 COMMENTS
- /
- 0 LIKES
-
이진수•2001.03.05 20:56TMemo에 보면 Lines란 프로퍼티가 있을 겁니다. 이건 TStrings로 선언 되어 있는데, 요건 Abstract Base C...
-
- 이진수
- 2001.03.05 20:46
- 0 COMMENTS
- /
- 0 LIKES
-
-
- 카오스@@
- •
- 2001.03.05 20:28
- 1 COMMENTS
- /
- 0 LIKES
-
뻐록이•2001.03.05 20:45카오스@@ wrote: > stringgrid의 셀의 문자 길이 제한할려구요...아래와 같이 하면 > if ACol = 1 then ...
-
- 바보감자
- 2001.03.05 20:14
- 0 COMMENTS
- /
- 0 LIKES
-
- 과객
- 2001.03.05 20:14
- 0 COMMENTS
- /
- 0 LIKES
-
- 이승근
- 2001.03.05 20:00
- 0 COMMENTS
- /
- 0 LIKES
-
- 늑대소년
- •
- 2001.03.05 19:58
- 2 COMMENTS
- /
- 0 LIKES
-
한원희•2001.03.06 20:27소스 정보를 보려면 다음과 같이 하시면 됩니다. 두 가지나 있네요.. ^^ pDocuemnt:IHTMLDocument2; ...
-
이진수•2001.03.05 20:51허접 소스입니다. 참고하세요 그리고 이건 여담인데요 MSDN참조 하시면 답이 다 있습니다. TWebBrows...
-
- 뻐록이
- 2001.03.05 19:44
- 0 COMMENTS
- /
- 0 LIKES
-
- 핼프맨
- 2001.03.05 19:36
- 0 COMMENTS
- /
- 0 LIKES
-
- 김정희
- •
- 2001.03.05 19:29
- 1 COMMENTS
- /
- 0 LIKES
--------------------- 입력 프로시저 구여 CREATE PROCEDURE INS_MEMO ( PNAME VARCHAR(15), PMEMO BLOB SUB_TYPE 1 SEGMENT SIZE 80 ) AS begin insert into memotest(name, memo) values(:PNAME,:Pmemo); suspend; end ---------------...-
명탁•2001.03.06 18:02김정희 wrote: > --------------------- 입력 프로시저 구여 > CREATE PROCEDURE INS_MEMO ( > PNAME ...
> --------------------- 입력 프로시저 구여
> CREATE PROCEDURE INS_MEMO (
> PNAME VARCHAR(15),
> PMEMO BLOB SUB_TYPE 1 SEGMENT SIZE 80
> ) AS
> begin
> insert into memotest(name, memo) values(:PNAME,:Pmemo);
> suspend;
> end
> --------------------- 리턴 되는 프로시저
> CREATE PROCEDURE RE_MEMO (
> PNAME VARCHAR(15)
> ) RETURNS (
> MEMO BLOB SUB_TYPE 1 SEGMENT SIZE 80
> ) AS
> begin
> select memo from memotest where name = :pname
> into :memo;
> suspend;
> end
> --------------------------
> procedure TForm1.Button1Click(Sender: TObject); /*이건 입력*/
> begin
> with ibstoredproc1 do
> begin
> params.clear;
> storedprocname :='ins_memo';
> prepare;
> params[0].AsString := edit1.text;
> params[1].asmemo := memo1.Text;
> execproc;
> unprepare;
> end;
> end; /* 이리 입력 하면.. 디비익스플로러에서 메모 입력 내용을 확인 할수
> 있어여..m^.^m 근디 ㅡㅡ; */
> -------------------------------
> procedure TForm1.Button2Click(Sender: TObject);
> begin
> with ibstoredproc1 do
> begin
> params.Clear;
> storedprocname := 're_memo';
> prepare;
> params[1].AsString := edit2.Text;
> execproc;
> ★→ memo2.Text := params[0].AsMemo;
> unprepare;
> end;
> end; /* 이렇게 하면.. MEMO2에 "(BLOB)" 라구 만나와여 다른건
> 돠되여.. 이것 만.ㅡㅡ; */
> 여기서 MEMO2.LINES.ADD(PARAMS[0].ASMEMO) 등등.. 초보 머리에서 나올수 있는건
> 다 했는디 ㅡㅡ; 역쉬.. 히히 안되여..
> 부탁 해여..
> 참고 // interbase6.1이구여. database dialect 3 여여
프로시저 컴포넌트 되~에쉰 그냥 퀴리컴포넌 쓰심됨다.
sql 'select * from 여기다가 프로시저 이름(:인풋파라미다~컥)
글구 이젠 멜하던 뒤로 하심됨다.
여기서 메모두 그냥 하던
memo1.text := dm.ibquery1.fields[18].asmemo;
이추룩..