본문 바로가기

Application179

Active Directory 관련하여 잘 정리된 곳 원문 위치 http://www.agnisoft.com/white_papers/active_directory.asp Active Directory Service Interfaces Author: Deepak Shenoy Introduction What is ADSI? Why should you use ADSI? Where is ADSI used? ADSI Architecture Overview COM Object Model Using ADSI in Delphi Binding Accessing Properties Searching Using ADO Using IDirectorySearch Security ADSI Schema Providers Conclusion References (Download the .. 2008. 8. 13.
urlencode wininet 이나 TWebBrower 를 이용하여 Get 또는 Post 로 데이타 전송시 특수 문자에 대한 누락 현상이 생긴다. +, %, & 등의 문자들을 사용한다면 Urlencode 를 통해 전송해야 한다. Webutil에 있는 URLEncode 함수를 간혹 정확하게 처리를 못하는 경우가 있는듯 싶다. HTTPApp에 있는 HttpEncode 함수를 사용하니 이상 없이 돌아간다. 개인적인 테스트 환경에서 참고 하길 바란다 2008. 8. 13.
String replace, getParam 함수 procedure replace(var source : string; find, repl : string); var ind : integer; begin ind := pos(find, source); if ind > 0 then begin source := copy(source, 1, ind-1) + repl + copy(source, ind + length(find), 10000); replace(source, find, repl); end end; 사용법은 replace(str,'메롱','하이'); ShowMessage(str); function GetParam(str : string; index : integer) : string; var i, count : integer; tmp : string;.. 2008. 8. 13.
String Compress /Decompress uses ZLib; (* * CompressString() usage: * * CompressedString := CompressString(DataString); *) function CompressString(const S: string) : string; var InputStream: TCompressionStream; OutputStream: TMemoryStream; Size: Integer; begin OutputStream := TMemoryStream.Create; try InputStream := TCompressionStream.Create(clMax, OutputStream); try Size := Length(S); InputStream.Write(Size, SizeOf(Size)).. 2008. 8. 13.