김경식 wrote:

> 1. 클립보드의 내용중에 Bitmap이 있으면 그것을 jpg파일로 저장할려고 합니다.

> 그래서 다음과 같이 한번 해 봤는데, 잘 안되는 부분이 있네요.....

> procedure TFMain.PasteExcute(Sender: TObject);

> var

> jpg: TJPEGImage;

> begin

> if Clipboard.HasFormat(CF_BITMAP) then

> try

> jpg := TJPEGImage.Create;

> jpg.Assign({이 부분에 어떤 내용이 들어가야 할지....});

> jpg.SaveToFile('파일명');

> finally

> jpg.Free;

> end;

> end;



다음과 같이 해보시기 바랍니다.



procedure TForm1.Button1Click(Sender: TObject);

var

jpg: TJPEGImage;

bmp: TBitmap;

begin

if Clipboard.HasFormat(CF_BITMAP) then

begin

jpg := TJPEGImage.Create;

bmp := TBitmap.Create;

try

bmp.Assign(Clipboard);

jpg.Assign(bmp);

jpg.SaveToFile('c:cho.jpg');

finally

jpg.Free;

bmp.Free;

end;

end;



end;





> 그리고, 만약 클립보드에 Bitmap이 둘 이상있을 경우에 첫번째것을 저장하고 난 다음, 그 다음 그림을 어떻게 불러오는 지도 궁금합니다.



보통 클립보드에는 하나밖에 저장되지 않나요? 아마도 여러개가 저장될수 있는 프로그램을 쓰시다면 이거에 대해서는 저도 해보지 않아서 모르겠습니다.



>

> 2. 파라독스를 동적생성으로 사용하는데, Memo필드에서 대소문자구분을 하지 않도록 하는 옵션이 있는지 궁금합니다. String필드는 생성시에 [ixCaseInsensitive]라는 옵션을 사용하면 되는걸로 알고 있는데, Help에 보니 이 옵션은 Memo필드에는 적용이 되지 않는다고 하더군요.



이거는 무신 얘기인지 모르겠군요... 쩝.

>

> 여러분의 온정의 손길(?)을 기다리겠습니다. ^^;

답변에 진심으로 감사드립니다.



근데, 두번째 질문이 무슨 말인지 모르겠다고 하셨는데, 아마도 제가 설명을 잘 못한것 같습니다. -_-;



다시 한번 설명드리면 문제는 쿼리시에 메모에서 쿼리를 할 경우 대소문자를 구분해서 쿼리가 된다는 것입니다.



예를 들어....



with Query1 do begin

SQL.Close;

SQL.Clear;

SQL.Add('SELECT * FROM TEMP.DB WHERE Memo Like '%ABc%');

SQL.Open;

end;



이렇게 쿼리를 할 경우 메모타입인 Memo필드에서 ABC 또는 Abc등등은 검색되지 않는다는 말씀을 드리고 싶었습니다. 설명이 잘 되었는지 모르겠군요....

다시 한번 살펴주십시오... ^^;