본문 바로가기

Application/Delphi Lecture126

최근 문서 지우기 !************************************** ! Name: Delete Windows Recent Documents ! Description:How to delete the Window's ! recent documents folder. By Clayton Turn ! er. ! By: ! !This code is copyrighted and has ! limited warranties.Please see http://w ! ww.Planet-Source-Code.com/vb/scripts/Sho ! wCode.asp?txtCodeId=32&lngWId=7 !for details. !************************************** uses ShlOBJ; p.. 2008. 7. 24.
Thumbnail 이미지 만들기 function GenerateThumbnails(const InDir, OutDir, Mask: string): LongInt; var Sr: TSearchRec; Master: TImage; Slave: TBitmap; const MAX_WIDTH = 320; //set maximum width for thumbnail MAX_HEIGHT = 240; //set maximum height for thumbnail begin Master := TImage.Create(form1); Slave := TBitmap.Create; Result := 0; try if FindFirst(InDir + '\' + Mask,faAnyFile,Sr) = 0 then begin repeat if (Sr.Name '.'.. 2008. 7. 24.
webbrowser post 로 넘기기 var strList : TStringList; vWebAddr, vPostData, vFlags, vFrame, vHeaders: OleVariant; iLoop: Integer; stURL, stPostData: String; begin stPostData := 'aviFileNameFullPath=adadfads&strSmiFileFullPath=ㅁㅇㄻㅇㄴ'; vHeaders:= 'Content-Type: application/x-www-form-urlencoded'+ #10#13#0; vPostData:= VarArrayCreate([0, Length(stPostData)], varByte); for iLoop := 0 to Length(stPostData)- 1 do begin vPostData.. 2008. 7. 24.
웹에서 파일 다운로드 받기 빵집에 파일 다운로드 기능이 있다.... 웹브라우져에서 http://xxxx.zip을 클릭하면 바로 다운로드 되다는 ... 그걸 말하는게 아니고.... 빵집을 실행해 놓고.. 웹브라우져에서 zip파일 다운로드 링크를 .. 클릭을 하지말고 그 링크를 드래그해다가 빵집에다가 떨궈보자..... 그러면 빵집이 그 링크가 가리키는 경로의 파일을 다운로드해서 열어준다..... 그걸 설명하고자 하는것이니 한번도 안해본사람은(많을거다...맹글어 놓고도 얘기를 안했으니 --;; ) 일단 함 해보기 바란다...... 파일을 다운로드 하는 방법중에 간단한 방법이 URLDownloadToFile 함수가 있다... URLMon.pas에 있는 API함수인데... 사용법이 간단하고 명확해서 사용하기 좋다... 물론 인터넷에 연결이.. 2008. 7. 24.