youngae wrote:

> 역시 초보입니다...

> 전....

>

> 여러개의 폼에서 하나의 화일에 그 프로그램에서

> 쓰이는 함수들을 모아 놓고 불러 들이기만 해서

> 쓰는 방법(누가 모듈화라고 하던데)

> 그거 어떻게 하는건가여....

> 제발 좀

> 부탁드릴께여....

>



일반적으로 폼없는 pas파일을 구성하여 여러가지 함수를 만들어 놓고

이 함수의 내용을 참고할 때는 Implemetation아래에 use문으로 정의합니다.

폼없는 pas파일은 그냥 아무 .pas파일의 내용을 복사하여 노트패드에 옮겨 놓고

적정하게 고치는데

대충 이렇습니다.



unit GRFun;



interface



uses

Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs,

StdCtrls, Db, DBTables, IniFiles, Shellapi;





procedure Form_Start; //폼이 스타트 될때 기본환경설정

procedure Form_Close(PID:string);//자기폼의 핸들을 지우는 루틴

procedure Ini_File_Write(IniFile:string; Section1:String; Section2:String; SValue:String);

function Ini_File_Read(IniFile:string; Section1:String; Section2:String):String;

function EMsg(Err_no:Integer):String;

procedure App_Run(App_name:string; sWindowName:string);

function Zero_Fill(V:string;Cnt:Integer;F:Boolean):String;

procedure Crs(kind:Integer);

function myGetComputerName : String;



implementation



//반드시 프로시저앞에 유닛명을 쓰면 안된다는 겁니다.

procedure Form_Start;

begin



end;