Q&A
- Stream이용해서 DB에 이미지를 저장하고 나서, 다시 초기화?
Stream을 이용해서 DB에 이미지를 저장하고 불러들이고는 되는데요,
특정 레코드에 저장된 이미지를 없애려고(Edit) 하는데 잘 안되네요,
어떻게 하는지 가르쳐주세요.
아래는 제가 한 번 해본 방식인데 계속 다운되네요...
procedure TForm1.Button3Click(Sender: TObject);
var
TempStream : TStream;
begin
Image1.Picture := nil;
if Table1.FindKey(['001']) then
begin
Table1.Edit;
Table1.FieldByName('name').AsString := '';
TempStream :=
Table1.CreateBlobStream(Table1.FieldByName('pic'), mReadWrite);
TempStream := nil;
Table1.Post;
TempStream.Free;
end;
특정 레코드에 저장된 이미지를 없애려고(Edit) 하는데 잘 안되네요,
어떻게 하는지 가르쳐주세요.
아래는 제가 한 번 해본 방식인데 계속 다운되네요...
procedure TForm1.Button3Click(Sender: TObject);
var
TempStream : TStream;
begin
Image1.Picture := nil;
if Table1.FindKey(['001']) then
begin
Table1.Edit;
Table1.FieldByName('name').AsString := '';
TempStream :=
Table1.CreateBlobStream(Table1.FieldByName('pic'), mReadWrite);
TempStream := nil;
Table1.Post;
TempStream.Free;
end;
1
COMMENTS
(NOTICE) You must be logged in to comment on this post.
-
- 초보
- 2000.02.04 13:33
- 0 COMMENTS
- /
- 0 LIKES
-
- 김기수
- •
- 2000.02.04 12:57
- 2 COMMENTS
- /
- 0 LIKES
-
이정욱•2000.02.05 10:27무슨말씀 이신지...?? 답변 잘 되는데요... 김기수 wrote: > 질문에 대한 답변이 안되네요. > ...
-
keisu•2000.02.08 10:51전의 세개의 메세지가 잘못 된 것입니다. 그것때문에 한 질문에 답해주시지 않나 보군요. 제발좀 답해 주세...
-
- 김기수
- 2000.02.04 12:53
- 0 COMMENTS
- /
- 0 LIKES
-
- 김기수
- 2000.02.04 12:48
- 0 COMMENTS
- /
- 0 LIKES
-
- 김기수
- 2000.02.04 12:44
- 0 COMMENTS
- /
- 0 LIKES
-
- 윤진화
- •
- 2000.02.04 04:31
- 1 COMMENTS
- /
- 0 LIKES
Stream을 이용해서 DB에 이미지를 저장하고 불러들이고는 되는데요, 특정 레코드에 저장된 이미지를 없애려고(Edit) 하는데 잘 안되네요, 어떻게 하는지 가르쳐주세요. 아래는 제가 한 번 해본 방식인데 계속 다운되네요... procedure TFo...-
양병규•2000.02.04 10:08TempStream := nil;는 스트림의 내용을 지우는것이 아니라 스트림형 변수에 값을 해제하는 역할을 합니다. ...
-
-
nilriri•2000.02.04 22:51이런 작업이 왜 필요하신지 이해가 잘 안되는 군요?? 그렇다면 다른 폼에서 붙여넣기해 온 버튼을 선택...
-
-
- 이희선
- •
- 2000.02.04 03:00
- 1 COMMENTS
- /
- 0 LIKES
-
양병규•2000.02.04 10:03DoubleBuffered를 사용해 보세요 예를들어서 Panel1위에 Image1이 있을경우 Panel1.DoubleBuffered := T...
-
- 송수현
- •
- 2000.02.04 01:35
- 1 COMMENTS
- /
- 0 LIKES
-
최원실•2000.02.04 01:55송수현 wrote: > 안녕하세요 꾸벅~! > > 툴바에서 flat효과 즉 튀어 나올때 이미지가 변경 되던데 그 ...
-
- 김훈
- •
- 2000.02.04 01:31
- 2 COMMENTS
- /
- 0 LIKES
-
김진호•2000.02.04 01:42김훈 wrote: > 안녕하십니까? > 우선, 새해 복 많이 받으십시오. > 제가 봉착한 문제는 아래와 같습니다...
-
김훈•2000.02.04 02:24많은 도움을 받았습니다. 감사드립니다. 김진호님...^^
-
- 최원실
- •
- 2000.02.04 01:27
- 1 COMMENTS
- /
- 0 LIKES
-
하얀까마귀•2000.02.05 00:20DeCode로 쓰셔도 되구요.. 전 그냥 편하게 TempTable을 만들어요... 그게 여러가지로 편하거든요.. 물론 ...
-
- orion
- 2000.02.04 01:25
- 0 COMMENTS
- /
- 0 LIKES
-
- 노경현
- •
- 2000.02.04 01:02
- 1 COMMENTS
- /
- 0 LIKES
-
양병규•2000.02.04 09:59TB97이라는놈이 있슴다. 델마당에도 있고 델코에도 있고 아마 이곳 자료실에도 있을검다. 이놈이 델...
-
- 신승철
- 2000.02.04 00:41
- 0 COMMENTS
- /
- 0 LIKES
-
- 이세영
- 2000.02.04 00:31
- 0 COMMENTS
- /
- 0 LIKES
-
- 김용성
- •
- 2000.02.03 23:49
- 1 COMMENTS
- /
- 0 LIKES
-
박성훈•2000.02.04 02:52김용성 wrote: > 안녕하세요.. > 그룹별로 소계를 내려 하는데 > 첫번째 그룹은 소계가 나옵니다. > Gr...
-
- 윤병익
- 2000.02.03 22:39
- 0 COMMENTS
- /
- 0 LIKES
-
- 은지
- 2000.02.03 20:52
- 0 COMMENTS
- /
- 0 LIKES
-
- 하얀까마귀
- 2000.02.03 20:40
- 0 COMMENTS
- /
- 0 LIKES
-
- 강정민
- •
- 2000.02.03 19:34
- 1 COMMENTS
- /
- 0 LIKES
-
aaa•2000.02.03 20:29웹서버 어플리케이션에 대한 공부가 필요합니다. ActiveX 컨트롤은 그 자체가 IE에 불과합니다. 따라...
TempStream := nil;을 TempStream.SetSize( 0 );으로 바꿔보세요 ..(이게 맞나?)
그럼
평안하시길~
윤진화 wrote:
> Stream을 이용해서 DB에 이미지를 저장하고 불러들이고는 되는데요,
> 특정 레코드에 저장된 이미지를 없애려고(Edit) 하는데 잘 안되네요,
> 어떻게 하는지 가르쳐주세요.
>
> 아래는 제가 한 번 해본 방식인데 계속 다운되네요...
>
> procedure TForm1.Button3Click(Sender: TObject);
> var
> TempStream : TStream;
> begin
> Image1.Picture := nil;
> if Table1.FindKey(['001']) then
> begin
> Table1.Edit;
> Table1.FieldByName('name').AsString := '';
> TempStream :=
> Table1.CreateBlobStream(Table1.FieldByName('pic'), mReadWrite);
> TempStream := nil;
> Table1.Post;
> TempStream.Free;
> end;