본문 바로가기
반응형

Delphi84

[개발/delphi] string to char array 문자열 복사 [개발/delphi] string to char array 문자열 복사 Visual C++ 뿐만 아니라 델파이도... 배열 문자열에 string 문자열을 복사해야할 경우가 생긴다. StrLCopy () 함수를 사용하여 해결해 보자. var ch: array[0..10] of Char; c: Char; x: Integer; st: string; begin st := 'Testing'; StrLCopy(PChar(@ch[0]), PChar(st), High(ch)); // or StrPLCopy(ch, st, High(ch)); x := 100; for c in ch do begin Canvas.TextOut(x, 100, c); Inc(c, Canvas.TextWidth(c) + 3); end; end; 2012. 2. 21.
[개발/delphi] 다른 프로그램 버튼 클릭하기 다른 프로그램 버튼 클릭하기 // in delphi procedure TForm2.Button1Click(Sender: TObject) var hParent: HWND; hChild: HWND; begin hParent := FindWindow('TForm1', nil); if hParent 0 Then begin hChild := FindWindowEx(hParent, 0, 'TButton', nil); if (hChild 0) Then begin SendMessage(hChild, WM_LBUTTONDOWN, 0, 0); SendMessage(hChild ,WM_LBUTTONUP, 0, 0); end; end; end; 2012. 2. 7.
[개발/delphi] Indy 을 이용한 idHTTP POST 파일 전송 예제 [개발/delphi] Indy 을 이용한 idHTTP POST 파일 전송 예제 출처 : http://namul.pe.kr/10?category=4 Indy 에 TidMultiPartFormData 유닛이 있더군요. TidMultiPartFormDataStream 을 이용해서 파일등을 POST하는 예제 입니다. procedure TFmMain.Button1Click(Sender: TObject); var DataStream : TidMultiPartFormDataStream; rs: TMemoryStream; begin DataStream := TIdMultiPartFormDataStream.Create; rs := TMemoryStream.Create; try idHTTP1.Request.ContentT.. 2012. 1. 25.
[개발/delphi] How can I pass PostData when I Navigate to a URL [개발/delphi] How can I pass PostData when I Navigate to a URL Q : How can I pass PostData when I Navigate to a URL? A : I call the below method with a URL destination, PostData in the format of 'animal=cat&color=brown' etc. and the TWebBrowser object that I want to load the URL inside of... procedure TDBModule.Navigate(stURL, stPostData: String; var wbWebBrowser: TWebBrowser); var vWebAddr, vPost.. 2012. 1. 25.
[개발/delphi] 델파이 - Object Pascal 강좌 두 번째 강좌 : 이번에는 델파이의 근간을 이루고 있는 Object Pascal에 대해 알아보겠습니다! 출처: http://cafe.daum.net/delphi5Completed/5XK/3?docid=6zC|5XK|3|20000805083613&q=%B5%A8%C6%C4%C0%CC%20longword 2.1 기본 Data Type 일반적으로 어떤 언어든 기본적인 데이터 형은 비슷하다. 왜냐하면 같은 컴에서 돌아가니까... 델파이 4의 새로운 기능으로 세가지 Type이 나온다. 델파이4에서는 일반적인 Interger형(32bit Longint)으로 처리할 수 없는 너무 큰 정수값을 사용하고자 할 때 새롭게 Int64형을 사용할 수 있다. 그리고 StrToInt64와 StrToInt64, StrToInt64.. 2012. 1. 18.
[개발/delphi] 인터넷 연결 목록을 추적하기 [개발/delphi] 인터넷 연결 목록을 추적하기 // d2007, JVCL 사용, TJvRas32 (PhoneBook VCL) const RAS_MaxEntryName = 256; RASBASE = 600; ERROR_BUFFER_TOO_SMALL = RASBASE + 3; ERROR_INVALID_SIZE = RASBASE + 32; type PRasEntryName = ^TRasEntryName; TRasEntryName = record dwSize: Longint; szEntryName: array [0..RAS_MaxEntryName] of Char; end; function RasEnumEntriesA(reserved: PChar; lpszPhonebook: PChar; lpRasEntryNa.. 2012. 1. 17.
반응형