현재 실행되고 있는 프로그램의 절대경로+실행파일명 정보 Application.Title := ‘임시저장 문자열’;
대입을 해도 영향을 받는건 없으며 임시 저장소로 활용가능하다.
Application.onMessage:= 프로시져명 또는 함수명
?????
application.Terminate;
메인폼에서나 서브폼에서나 어느 폼에서나 사용하게 되면 프로그램(어플리케이션)이
종료됩니다.
※ Unit, Project 파일에서 사용 가능합니다.
※ 메인폼에서만 close; 명령을 실행하면 application.Terminate; 명령과 같은 역할을 합니다.
Application.ShowMainForm := False;
폼을 보이지 않게 합니다. 해당폼은 작업표시줄에도 나타나지 않습니다.
보통 실행할때 파라미터를 받아서 그값으로 숨길지 말지 구분해서 실행합니다.
※ Unit, Project 파일에서 사용 가능합니다.
Application.Initialize;
Application.CreateForm(TForm1, Form1);
Application.ShowMainForm:= False;
Application.Run;
※ Application.ShowMainForm := True;로 다시 폼을 보이게 할수 있습니다.
Application.ProcessMessages
1. 큐에 쌓인 메시지를 모두 삭제(클리어)한다.
2. 하나의 프로세스에서 루프가 돌아 화면이나 다른 작업들을 진행 할 수 없게 되었을때Application.ProcessMessages을
호출해 주면 화면 및 다른 작업들을 컨트롤 할수 있게 된다.
* idftp 컴퍼넌트를 이용해서 파일 다운시 중간에 Application.ProcessMessages 를 안써주면 처리할 메시지가
많아서 에러가 나는 경우도 있다. (에러 메시지 : Connection Closed Gracefully)
Application.ProcessMessages 예제
while fbool do
begin
inc(i);
Edit1.Text := IntToStr(i);
Edit1.Refresh;
Application.ProcessMessages;
end;
Application.MessageBox(‘메세지 내용’,’메세지 제목’);
메세지 내용과 메세지 내용을 정의해서 ShowMessage() 함수와 비슷한 메세지 박스창을 출력한다.
델파이 실행시에 파라미터갯수와 파라미터값을 알아내기
사용예제
program Project2;
uses
Forms, Dialogs, Sysutils,
Unit1 in ‘Unit1.pas’ {Form1};
{$R *.res}
begin
Application.Initialize; // 프로그램 초기화
if ParamStr(0)</STRonG> = ” then begin // 파라미터 체크
Application.CreateForm(TForm1, Form1); // 폼생성
Application.Run; //폼실행
end
else begin
Application.MessageBox(‘실행을 실패 하였삼.’,’실패’); // 메세지 출력
ShowMessage(IntToStr(ParamCount)); // 메세지 출력
application.Terminate; // 프로그램 종료
end;
end.
ParamStr(0) – 파라미터의 값
(0 부터 시작하며 0 은 실행파일경로이며 1 부터가 첫번째가 파라미터이다.)
ParamCount – 전체 파라미터의 갯수
(실행파일경로를 제외하고 순수 파라미터의 갯수)
※ ParamStr, ParamCount 값은 모든 유닛에서 사용 가능합니다.
상철님의 스페이스 