Aplica��o sem Form

Question

Galera eu estou querendo criar uma aplica��o com um unico form e esse form deve ser criado em run-time. alguem sabe me dizer como eu fa�o isso?Desde j� valeu...

Obubiba · Answer

Talvez esse c�digo lhe ajude:____________________________________________________________program Project1;uses  Forms,  Unit1 in �Unit1.pas� ;{$R *.res}begin  Application.Initialize;  Application.Run;end.____________________________________________________________unit Unit1;interfaceuses  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,  Dialogs;type  TForm1 = class(TForm)  private    { Private declarations }  public    { Public declarations }  end;var  Form1: TForm1;implementation{$R *.dfm}[b:cd37cf3d81]initialization  if messagedlg(�Criar o form?�,mtConfirmation,mbOKCancel, 0) = mrOk then     Application.CreateForm(TForm1, Form1);[/b:cd37cf3d81]end._______________________________________________________...

Toshio Bruno · Answer

[quote:e572945578=�obubiba�]Talvez esse c�digo lhe ajude:____________________________________________________________program Project1;uses  Forms,  Unit1 in �Unit1.pas� ;{$R *.res}begin  Application.Initialize;  Application.Run;end.____________________________________________________________unit Unit1;interfaceuses  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,  Dialogs;type  TForm1 = class(TForm)  private    { Private declarations }  public    { Public declarations }  end;var  Form1: TForm1;implementation{$R *.dfm}[b:e572945578]initialization  if messagedlg(�Criar o form?�,mtConfirmation,mbOKCancel, 0) = mrOk then     Application.CreateForm(TForm1, Form1);[/b:e572945578]end._______________________________________________________[/quote:e572945578]amigo valeu pela dica mas n�o deu certoo delphi deu o erro a seguir:Project Project1.exe raised exception class EClassNotFoundWith Message �Class TButton not Found�. Process stopped. Use Step or Run to continue.que erro � esse e como resolver?Desde j� agrade�o....

Obubiba · Answer

[i:edab481e6e]Project Project1.exe raised exception class EClassNotFoundWith Message �Class TButton not Found�. Process stopped. Use Step or Run to continue.[/i:edab481e6e]

Este erro n�o tem a ver com o c�digo que lhe passei, � algo no seu projeto. Provavelmente voc� est� tentando instanciar/usar um bot�o n�o declarado na unit do Form. V� ao menu [b:edab481e6e]Project[/b:edab481e6e] - [b:edab481e6e]Sintax Check[/b:edab481e6e], e veja quais erros o Compilador aponta.

Toshio Bruno · Answer

[quote:67c4765a95=�obubiba�][i:67c4765a95]Project Project1.exe raised exception class EClassNotFoundWith Message �Class TButton not Found�. Process stopped. Use Step or Run to continue.[/i:67c4765a95]Este erro n�o tem a ver com o c�digo que lhe passei, � algo no seu projeto. Provavelmente voc� est� tentando instanciar/usar um bot�o n�o declarado na unit do Form. V� ao menu [b:67c4765a95]Project[/b:67c4765a95] - [b:67c4765a95]Sintax Check[/b:67c4765a95], e veja quais erros o Compilador aponta.[/quote:67c4765a95]No sintax ckeck ele n�o diz nada e n�o estou com bot�o nenhum s� a rotina que voc� me passou....

Roger_malk · Answer

Toshio BrunoNo meu caso (D6) funcionou com a UNIT StdCtrls no USES do Form1.Espero q te ajude....roger_malk...

F�rum Aplica��o sem Form #169145