zs C30403

Member since: Sunday, 22 January 2017
Last login: 5 months ago
Profile viewed: 198 views

No Rank
Points: 0

I saved it with the name p1. Does the file name refer to the project name?

procedure TMainForm.TabSheetClose(Sender: TObject; var AllowClose: Boolean); var Ts : TUniTabSheet; Nd : TUniTreeNode; begin Ts := Sender as TUniTabSheet; Nd := Pointer(Ts.Tag); if Assigned(Nd) then begin Nd.Data := nil; if NavTre

procedure TMainForm.TabSheetClose(Sender: TObject; var AllowClose: Boolean); var Ts : TUniTabSheet; Nd : TUniTreeNode; begin Ts := Sender as TUniTabSheet; Nd := Pointer(Ts.Tag); if Assigned(Nd) then begin Nd.Data := nil; if NavTre

Main.cpp(41): parsing: void _fastcall TMainForm::UniFormCreate(TObject *) [bcc32 Error] Main.cpp(218): E2034 Cannot convert 'TComponent *' to 'int' Full parser context Main.cpp(204): parsing: void _fastcall TMainForm::OpenForm(UnicodeStri

procedure TfrmMain.OpenForm(Caption,FormClassName:string); var i:integer; sheet:TUniTabSheet; begin for i := 0 to pgeMain.PageCount-1 do begin if pgeMain.Pages[i].Caption=Caption then begin pgeMain.ActivePageIndex:=i; exit; end; end;sheet:=TUniTabShe

procedure TfrmMain.OpenForm(Caption,FormClassName:string); var i:integer; sheet:TUniTabSheet; begin for i := 0 to pgeMain.PageCount-1 do begin if pgeMain.Pages[i].Caption=Caption then begin pgeMain.ActivePageIndex:=