본문 바로가기

Application179

웹에서 파일 다운로드 받기 빵집에 파일 다운로드 기능이 있다.... 웹브라우져에서 http://xxxx.zip을 클릭하면 바로 다운로드 되다는 ... 그걸 말하는게 아니고.... 빵집을 실행해 놓고.. 웹브라우져에서 zip파일 다운로드 링크를 .. 클릭을 하지말고 그 링크를 드래그해다가 빵집에다가 떨궈보자..... 그러면 빵집이 그 링크가 가리키는 경로의 파일을 다운로드해서 열어준다..... 그걸 설명하고자 하는것이니 한번도 안해본사람은(많을거다...맹글어 놓고도 얘기를 안했으니 --;; ) 일단 함 해보기 바란다...... 파일을 다운로드 하는 방법중에 간단한 방법이 URLDownloadToFile 함수가 있다... URLMon.pas에 있는 API함수인데... 사용법이 간단하고 명확해서 사용하기 좋다... 물론 인터넷에 연결이.. 2008. 7. 24.
indy idhttp 이용해서 파일 업로드 procedure TForm1.Button1Click(Sender: TObject); var UploadFile: TIdMultiPartFormDataStream; Outputs: TStringStream; begin if OpenDialog1.Execute then begin UploadFile := TIdMultiPartFormDataStream.Create; Outputs := TStringStream.Create(''); try IdHTTP.Request.ContentType := UploadFile.RequestContentType; UploadFile.AddFormField('Mb_Num', '13'); UploadFile.AddFile('UploadList', OpenDialog1.FileN.. 2008. 7. 24.
Post 방식으로 데이타 넘기기 여기 저기 찾다 Navigate2를 이용하는 것을 찾았습니다. 혹 다른분을 위해 소스를 올립니다. =================== uses ComObj; procedure TDlgRegisterPC.OnlineRegist(const AUID, AFlag: string); var WebBrowser1: Variant; WebAddr, VPostData, VFlags, VFrame, VHeaders: OleVariant; iLoop: Integer; PostData: string; begin PostData := 'UID=' + AUID + '&Flag=' + AFlag; WebBrowser1 := CreateOleObject('InternetExplorer.Application'); if Length(.. 2008. 7. 24.
웹상의 이미지 불러오기 uses IdURI, JPEG, IdHTTP ; procedure TForm1.Button1Click(Sender: TObject); var ImageURL: String; begin ImageURL := 'http://eventzone.hanafos.com/images/8spot_131x121.gif'; GetWebImage(ImageURL); end; procedure TForm1.GetWebImage(AImageURL: String); var ImageStream: TMemoryStream; URI: TidURI; ImagePath: String; JPI: TJPEGImage; HTTP: TIdHTTP; begin ImageStream := TMemoryStream.Create; HTTP := TI.. 2008. 7. 24.

티스토리툴바