승적이익강 (勝敵而益强)

procedure TForm1.Button1Click(Sender: TObject); var sLogName : String; //로그 화일명 tLog : TEXTFILE; begin sLogName := copy(Application.ExeName,1,length(Application.ExeName)-4) + '.log'; //실행화일명.log ,실행화일과 동일디렉토리 AssignFile(tLog, sLogName); if FileExists( sLogName ) then Append( tLog ) // 파일이 존재하면 Append 한다. else Rewrite( tLog); // 파일을 새로 생성하고 연다. WriteLn( tLog, Format('%s %s', [FormatDateTime('YYYY..

in the OnCreate event place the following code: [Delphi] if ClientHandle 0 then Winapi.Windows.SetParent(ClientHandle, pnlMDI.Handle);where pnlMDI is a TPanel that can be placed anywhere on the form. This however is not enough. The MDIClient is moved and sized in TCustomForm.AlignControls which needs to be overridden to keep it occupying the whole panel it has been parented to. In the form's int..

출처 : DelphiKorea - 일반강좌 - MDI 로 구현하는 MIS 프로젝트 ============================= MDI 로 구현하는 MIS 프로젝트 ============================= ==================목차====================== 1. 들어가며... 2. 간단한 MDI 프로그램 만들기 3. 메인폼을 다루기 1) 클라이언트 영역의 조절 2)메인폼에 그림넣기 3) 메인폼에 메시지 넣기 4)메인폼의 스크롤바 없애기 4. 차일드 폼 다루기 1)클래스 이름으로 차일드 생성하기 2)차일드가 보여지는 위치 고정하기 3)차일드가 한번만 실행되도록 하기 5. 메뉴 다루기 1) 창메뉴에 실행중인 차일드 리스트 보여주기 2) 메인폼의 메뉴를 차일드에서 ..

{ 원칙 : 64비트 윈도우에 64bit ODBC 또는 Oledb 드라이버가 설치되어야 하고 개발 응용프로그램도 64-bit로 Bulid되어야 한다. -> 64비트 윈도우에 32-bit 응용프로그램을 설치할려면 : 32비트용 ODBC드라이버를 ODBC관리자가 아닌 c:\windows\sysWOW64\odbcad32.exe 걸로 해야 32비트를 등록할 수 있다. : oledb로 연결할 경우에도 32bit용 드라이버(altioledb.dll)을 레지스터리에 등록한다. } with ADOConnection do begin // 32bit ODBC 드라이버 설치(c:\windows\sysWOW64\odbcad32.exe)하고 데이터원본(ODBC)등록하여 연결 // ConnectionString := 'Provi..