Ver Mensaje Individual
  #8  
Antiguo 16-10-2006
Avatar de Ascii1457
Ascii1457 Ascii1457 is offline
Miembro
 
Registrado: oct 2006
Posts: 20
Reputación: 0
Ascii1457 Va por buen camino
Bueno... este es el codigo de Main.pas


Código Delphi [-]
unit Main;
interface
uses
//... blablabla ...
type
  TMainWIN = class(TForm)
//... blablabla ...
  private
    { Private declarations }
  public
    { Public declarations }
  end;
 
var
  MainWIN: TMainWIN;
  NombrePC: String;
  AudioCargado: Boolean;
implementation
{$R *.dfm}
 
Uses Textos; <- Aquí declaro el nombre del otro formulario
 
//... blablabla...
 
procedure TMainWIN.FormClick(Sender: TObject);
begin
 
Msgbox.ShowModal; <-- Aquí sale el error U_U

end;
 
//... blablabla ...
 
end.

y pues bueno el otro formulario tiene esto Textos.pas...

Código Delphi [-]
unit Textos;
interface
uses
// ... blablabla ...
type
  TMsgBox = class(TForm)
// ... blablabla ...
  private
    { Private declarations }
  public
    { Public declarations }
  end;
var
  MsgBox: TMsgBox;
implementation
{$R *.dfm}
end.

Estoo... igual cree un proyecto nuevo desde 0... y pues funciona bien, pero en este que les pongo... nop, me da el error @_@

Todooo mal con mi primer código en Delphi *_*

Última edición por Ascii1457 fecha: 16-10-2006 a las 03:45:10.
Responder Con Cita