최성진 wrote:

> select to_char(sysdate,'yyyy-mm-dd'),to_char(sysdate,'yyyy-mm-dd' from dual

> 이렇게하면 날짜랑 시간을 가져올수 있습니다. 그럼



답장 주셔서 감사합니다. 그런데요, 제가 그 방법으로 하니까 잘 안되네요...

컴파일도 되지 않습니다. 지금 현재 입력하는 곳에서는 날짜와 시간을 제외시킨 상태에서 입력이 잘 되거든요... 일단 소스를 올립니다. 한번 봐 주시고 도움 부탁드립니다..

바쁘실 텐데 죄송하고요....



// 입력 부분입니다.



with Query1 do

begin

Close;

Sql.Clear;

Sql.Add('insert into pitest ');

Sql.Add('(psabun, pentid, pimage)'); // 날짜, 시간이 들어가면 없어지는 부분

Sql.Add(' values(:psabun, :pentid, :pimage'); // <-- 이 부분에 날짜, 시간

ParamByName('psabun').Asstring := psabun.text; // 사번

ParamByName('pentid').Asstring := 'system'; // 입력자 id

Jpegimage :=Tjpegimage.Create;

Ms :=TmemoryStream.Create;

if image1.Picture.Graphic = nil then

begin

StatusBar1.Panels[1].text := '사진이 없습니다. 저장할 사진을 선택해주세요';

psabun.SetFocus

end

else

if image1.Picture.Graphic <> nil then

begin

jpegimage.Assign(Image1.picture.graphic);

ms.Position := 0;

jpegimage.SaveToStream(ms);

ParamByName('pimage').LoadFromStream(ms,ftblob); // 사진

end;

jpegimage.Destroy;

ms.Destroy;