Q&A
- Tmemo Field내용 DB에 저장하는데 문제있음
// 프로그램 소스
with QFltsInfoRgst do
begin
Close;
SQL.Clear;
sqlstr := 'INSERT INTO FLTS_NO_MST (LINE_NO, DLVR_NO, FLTS_NO, FLTS_CNTS,';
sqlstr := sqlstr + ' FLTS_DESP, FLTS_RPAR_DESP, FLTS_REL_DESP, RGST_NAME,
RGST_DATE)';
sqlstr := sqlstr + ' VALUES';
sqlstr := sqlstr + ''''+FRgstLineNo+''','''+FRgstDlvrNo+''',
'''+EFaultNoRgst.Text+''',';
sqlstr := sqlstr + ''''+EFaultCntsRgst.Text+''','''+MFaultCntsRgst.Text+''',';
sqlstr := sqlstr + ' '''+MReprCntsRgst.Text+''', '''+MRelCntsRgst.Text+''',';
sqlstr := sqlstr + ' '''+GWorkUserName+''', '''+GCurrentDate+''')';
SQL.Add(sqlstr);
ExecSql;
TMemo Field에 입력된 내용 예 (여기는 도시철도공사입니다.
그리고 프로그램을 작성중입니다.
감사합니다.)
을 이용해 TMEMO FILED의 내용을 저장한 후 다시 조회할 경우
(MReprCntsRtrv.Lines.Text := FieldByName('FLTS_RPAR_DESP').AsString;)
조회된 예:(여기는 도시철도공사입니다.
그리고 프로그램을 작성중입니다.
감사합니다.)
문제점 Enter 값이 입력된 부문에 대한 조회시 빈라인이 추가되어 조회되에 수정후
저장한후 다시 조회 하였을 경우에 다음과 같이 조회됩니다.
조회된 예 :(여기는 도시철도공사입니다.
그리고 프로그램을 작성중입니다.
감사합니다.)
질의사항 : (여기는 도시철도공사입니다.
그리고 프로그램을 작성중입니다.
감사합니다.)
저장시 Enter 값을 제거하고 저장할 수는 없나요
그래서 조회될 때
(여기는 도시철도공사입니다.
그리고 프로그램을 작성중입니다.
감사합니다.)
로 조회 될 수 있도록 ?
with QFltsInfoRgst do
begin
Close;
SQL.Clear;
sqlstr := 'INSERT INTO FLTS_NO_MST (LINE_NO, DLVR_NO, FLTS_NO, FLTS_CNTS,';
sqlstr := sqlstr + ' FLTS_DESP, FLTS_RPAR_DESP, FLTS_REL_DESP, RGST_NAME,
RGST_DATE)';
sqlstr := sqlstr + ' VALUES';
sqlstr := sqlstr + ''''+FRgstLineNo+''','''+FRgstDlvrNo+''',
'''+EFaultNoRgst.Text+''',';
sqlstr := sqlstr + ''''+EFaultCntsRgst.Text+''','''+MFaultCntsRgst.Text+''',';
sqlstr := sqlstr + ' '''+MReprCntsRgst.Text+''', '''+MRelCntsRgst.Text+''',';
sqlstr := sqlstr + ' '''+GWorkUserName+''', '''+GCurrentDate+''')';
SQL.Add(sqlstr);
ExecSql;
TMemo Field에 입력된 내용 예 (여기는 도시철도공사입니다.
그리고 프로그램을 작성중입니다.
감사합니다.)
을 이용해 TMEMO FILED의 내용을 저장한 후 다시 조회할 경우
(MReprCntsRtrv.Lines.Text := FieldByName('FLTS_RPAR_DESP').AsString;)
조회된 예:(여기는 도시철도공사입니다.
그리고 프로그램을 작성중입니다.
감사합니다.)
문제점 Enter 값이 입력된 부문에 대한 조회시 빈라인이 추가되어 조회되에 수정후
저장한후 다시 조회 하였을 경우에 다음과 같이 조회됩니다.
조회된 예 :(여기는 도시철도공사입니다.
그리고 프로그램을 작성중입니다.
감사합니다.)
질의사항 : (여기는 도시철도공사입니다.
그리고 프로그램을 작성중입니다.
감사합니다.)
저장시 Enter 값을 제거하고 저장할 수는 없나요
그래서 조회될 때
(여기는 도시철도공사입니다.
그리고 프로그램을 작성중입니다.
감사합니다.)
로 조회 될 수 있도록 ?
1
COMMENTS
(NOTICE) You must be logged in to comment on this post.
-
-
Umpro•2001.01.09 23:39초보초보 wrote: > 이런식으루 간단히 insert 하는 부분인데 > 왜 Type Mismatch가 나오는지 전혀 모르겠... -
Umpro•2001.01.09 23:46Umpro wrote: > 초보초보 wrote: > > 이런식으루 간단히 insert 하는 부분인데 > > 왜 Type Mismatch가 ...
-
-
- 최문진
- •
- 2001.01.09 22:21
- 1 COMMENTS
- /
- 0 LIKES
// 프로그램 소스 with QFltsInfoRgst do begin Close; SQL.Clear; sqlstr := 'INSERT INTO FLTS_NO_MST (LINE_NO, DLVR_NO, FLTS_NO, FLTS_CNTS,'; sqlstr := sqlstr + ' FLTS_DESP, FLTS_RPAR_DESP, FLTS_REL_DESP, RGST_NAME, RGST_DAT...-
xdelphi•2001.01.10 02:28최문진 wrote: > // 프로그램 소스 > with QFltsInfoRgst do > begin > Close; > SQL.Cle...
-
- lubzzon
- •
- 2001.01.09 22:19
- 1 COMMENTS
- /
- 0 LIKES
-
+^-_-^+•2001.01.10 07:10yo` sql 구문을 사용하시면 됩니다. alter table test add yo char(5) deafult '' 이런식으로.....
-
- 성병규
- •
- 2001.01.09 22:11
- 3 COMMENTS
- /
- 0 LIKES
-
조승연•2001.02.24 20:57물론 가능합니다. 소켓 컴포넌트의 Event가 ONERROR일때 코딩하면 되지여.. procedure TfmChatClr.Serve...
-
조승연•2001.02.24 20:57물론 가능합니다. 소켓 컴포넌트의 Event가 ONERROR일때 코딩하면 되지여.. procedure TfmChatClr.Serve...
-
조승연•2001.02.24 20:56물론 가능합니다. 소켓 컴포넌트의 Event가 ONERROR일때 코딩하면 되지여.. procedure TfmChatClr.Serve...
-
- 필승이
- •
- 2001.01.09 22:08
- 2 COMMENTS
- /
- 0 LIKES
-
비즈코리아•2001.01.10 03:22[비즈코리아] 이런 경우에도 Thread를 사용해서 별도의 프로세서로 운용하시면 좋지요. 즉. 동시에 두개...
-
TMS•2001.01.09 22:34필승이 wrote: > 안녕하세요. > 새해에도 복많이받으세요. > .. > 한가지 물어보겠습니다. > 클라이언...
-
- 초보
- •
- 2001.01.09 22:04
- 2 COMMENTS
- /
- 0 LIKES
-
guest•2001.01.20 06:11초보 wrote: > 질문{ > > 눈에 많이 오내요 > > > > DBRichEdit에서 깨지는 데 이유를 모르 겠네요 >...
-
전상욱•2001.01.10 02:22초보 wrote: > 질문{ > > 눈에 많이 오내요 > > > > DBRichEdit에서 깨지는 데 이유를 모르 겠네요 >...
-
- 김기성
- •
- 2001.01.09 21:25
- 1 COMMENTS
- /
- 0 LIKES
-
비즈코리아•2001.01.10 03:23[비즈코리아] install shield는 델파이CD안에 들어있답니다. 찾아보세요... ==========================...
-
- 필승이
- 2001.01.09 21:15
- 0 COMMENTS
- /
- 0 LIKES
-
- 남현선
- 2001.01.09 21:07
- 0 COMMENTS
- /
- 0 LIKES
-
- 안장근
- 2001.01.09 21:05
- 0 COMMENTS
- /
- 0 LIKES
-
- 선
- 2001.01.09 21:02
- 0 COMMENTS
- /
- 0 LIKES
-
- 왕쵸뽀
- •
- 2001.01.09 20:53
- 1 COMMENTS
- /
- 0 LIKES
-
방경주•2001.01.09 20:56오라클을 구입하면 딸려서 옵니다... 시중에서도 구할수 있나? -_-; 왕쵸뽀 wrote: > 오라클에러코...
-
- 델초보
- 2001.01.09 20:42
- 0 COMMENTS
- /
- 0 LIKES
-
- hobakpa
- •
- 2001.01.09 20:37
- 3 COMMENTS
- /
- 0 LIKES
-
eewook•2001.01.10 10:54hobakpa wrote: > 아이고 지겹게 눈이 내립니다. 이동하실때 몸조심들 하세요. > > 질문 드리겠습니다....
-
ksb5073@magicn.co.kr•2001.02.10 00:39eewook wrote: > hobakpa wrote: > > 아이고 지겹게 눈이 내립니다. 이동하실때 몸조심들 하세요. > > ...
-
hobakpa•2001.01.10 20:12> 안녕하셔요.. > 시리얼통신 컴퍼넌트부분이 자료실에서 검색해보면 있어요,,,써보진안았습니다. > ...
-
- 선
- 2001.01.09 20:33
- 0 COMMENTS
- /
- 0 LIKES
-
- 델초보
- •
- 2001.01.09 20:24
- 1 COMMENTS
- /
- 0 LIKES
-
액션가면•2001.01.09 22:28안녕하세염~ 정품 구입시 한글메뉴얼이 같이 따라나옵니다.. 메뉴얼은 헬프와 동일한데 헬프화일은 ...
-
- 쫑현이
- 2001.01.09 20:21
- 0 COMMENTS
- /
- 0 LIKES
-
- 미로
- •
- 2001.01.09 19:45
- 1 COMMENTS
- /
- 0 LIKES
-
서성호•2001.01.25 08:08미로 wrote: > 안녕하세요..... > 델파이에서 만든 프로그램에서 떠있는 홈페이지의 > edit box나 text ...
-
- 효진
- •
- 2001.01.09 19:37
- 4 COMMENTS
- /
- 0 LIKES
-
방경주•2001.01.09 20:58Select HN.HistoryNumber from maxhistoryNumber HN where HN.risonnumber='aaa' 효진 wrote: ...
-
효진•2001.01.09 23:31SQL = "Select HN.HistoryNumber " & _ "From maxhistoryNumber HN " & _ "Where HN.prison...
-
방경주•2001.01.10 00:14" 과 ' 라....전 "와 '....머 이래서 멀 물어보시는 건지 한참 고민 했슴돠...-_-;; 님께서 말씀 하신데...
-
효진•2001.01.10 00:52거참 그냥 "aaa"
-
- 전진운
- 2001.01.09 19:31
- 0 COMMENTS
- /
- 0 LIKES
> // 프로그램 소스
> with QFltsInfoRgst do
> begin
> Close;
> SQL.Clear;
> sqlstr := 'INSERT INTO FLTS_NO_MST (LINE_NO, DLVR_NO, FLTS_NO, FLTS_CNTS,';
> sqlstr := sqlstr + ' FLTS_DESP, FLTS_RPAR_DESP, FLTS_REL_DESP, RGST_NAME,
> RGST_DATE)';
> sqlstr := sqlstr + ' VALUES';
> sqlstr := sqlstr + ''''+FRgstLineNo+''','''+FRgstDlvrNo+''',
> '''+EFaultNoRgst.Text+''',';
> sqlstr := sqlstr + ''''+EFaultCntsRgst.Text+''','''+MFaultCntsRgst.Text+''',';
> sqlstr := sqlstr + ' '''+MReprCntsRgst.Text+''', '''+MRelCntsRgst.Text+''',';
> sqlstr := sqlstr + ' '''+GWorkUserName+''', '''+GCurrentDate+''')';
> SQL.Add(sqlstr);
> ExecSql;
>
> TMemo Field에 입력된 내용 예 (여기는 도시철도공사입니다.
> 그리고 프로그램을 작성중입니다.
> 감사합니다.)
>
> 을 이용해 TMEMO FILED의 내용을 저장한 후 다시 조회할 경우
>
> (MReprCntsRtrv.Lines.Text := FieldByName('FLTS_RPAR_DESP').AsString;)
> 조회된 예:(여기는 도시철도공사입니다.
>
> 그리고 프로그램을 작성중입니다.
>
> 감사합니다.)
>
> 문제점 Enter 값이 입력된 부문에 대한 조회시 빈라인이 추가되어 조회되에 수정후
> 저장한후 다시 조회 하였을 경우에 다음과 같이 조회됩니다.
>
> 조회된 예 :(여기는 도시철도공사입니다.
>
>
> 그리고 프로그램을 작성중입니다.
>
>
> 감사합니다.)
>
> 질의사항 : (여기는 도시철도공사입니다.
> 그리고 프로그램을 작성중입니다.
> 감사합니다.)
>
> 저장시 Enter 값을 제거하고 저장할 수는 없나요
> 그래서 조회될 때
> (여기는 도시철도공사입니다.
> 그리고 프로그램을 작성중입니다.
> 감사합니다.)
> 로 조회 될 수 있도록 ?
>
>
>
>
이렇게한번해보시죠?
혹시...도움이 될까해서 올립니다...
<저장할때...이렇게...>
ParamByName('FLTS_REL_DESP').AsMemo := MReprCntsRtrv.Text;
<조회할때...요렇게...>
MReprCntsRtrv.Text := FieldByName('FLTS_REL_DESP').AsString;