이전에 작성했든 델프로젝트를..이번에 시스템 다시밀고,,
포멧하여 설치하야 열어보니..
Ctrl+F12를 눌러 폼을 선택한후에..\F12를눌러도 폼화면이 안보이네요..
프로젝트내의 다른폼들은 모두 정상적으로 잘보이는데...
아래 어느분이 답변한것처럼....dfm파일도 분명히 있습니다...
uDM.pas
uDM.dfm
uDM.dcu
uDM.ddp
라는 파일들이 분명 존재합니다....
아래는 소스화일첨부합니다...
--------------< uDM.pas >p-----------------------
unit uDM;
interface
uses
SysUtils, Classes, DB, DBTables;
type
TDM = class(TDataModule)
tblPerson: TTable;
pimsDB: TDatabase;
dsPerson: TDataSource;
tblOrg: TTable;
dsOrg: TDataSource;
tblCompany: TTable;
dsCompany: TDataSource;
Table1: TTable;
tblCompanyCP_NAME: TStringField;
tblCompanyCP_ZIPCODE: TStringField;
tblCompanyCP_ADDR: TStringField;
tblCompanyCP_TEL: TStringField;
tblCompanyCP_FAX: TStringField;
tblCompanyCP_HOMEPAGE: TStringField;
procedure tblPersonBeforePost(DataSet: TDataSet);
procedure tblPersonBeforeEdit(DataSet: TDataSet);
private
{ Private declarations }
public
{ Public declarations }
end;
var
DM: TDM;
implementation
{$R *.dfm}
procedure TDM.tblPersonBeforePost(DataSet: TDataSet);
begin
DM.tblPerson.FieldByName('PN_SN').AsInteger := DM.tblPerson.FIeldByName('PN_SN').AsInteger +1;
end;
procedure TDM.tblPersonBeforeEdit(DataSet: TDataSet);
begin
tblPerson.Refresh;
end;
end.
----------------------------------------------------
|