change TUniFrame to TUniForm

[erich.wanker]

Hello ..

i have a lot of TUniFrames ... now i change my programm-struktur ..

 

Can i cange a existing TUniFrame  to a TUniForm ?

 

What must i look for?

 

ThanX

Erich

[bugra]

Hi;

 

First you can change frame's class inside your code you can see something like that

type
  TUniFrame1 = class(TUniFrame)
  private
    { Private declarations }
  public
    { Public declarations }
  end;

Change TUniFrame to TUniForm.

 

You'll see an error because there is no uniGUIForm unit in uses. Change uniGUIFrame to uniGUIForm under uses.

 

add following lines on implementation

function UniFrame1: TUniFrame1; //or your frame's name

under implementation add theese lines

uses
  MainModule, uniGUIApplication;

function UniFrame1: TUniFrame1;
begin
  Result := TUniFrame1(UniMainModule.GetFormInstance(TUniFrame1));
end;

Right click your frame and view as text (or open dfm file). If there is an empty frame you will see something like that

object UniFrame1: TUniFrame1
  Left = 0
  Top = 0
  Width = 320
  Height = 240
  TabOrder = 0
end

delete Width, Height and TabOrder lines and add theese

  ClientHeight = 299
  ClientWidth = 635
  Caption = 'UniForm1'
  OldCreateOrder = False
  MonitoredKeys.Keys = <>
  PixelsPerInch = 96
  TextHeight = 13

save then right click in this and view as Form.

 

Right click your project and view source

 

You see your frame like this

Unit1 in 'Unit1.pas' {UniFrame1: TUniFrame};

Change TUniFrame to TUniForm

 

Build your project.

[erich.wanker]

Perfect ... THANK YOU very much :-)