Erro em Delphi

Marcos Heringer · 26-10-2003, 17:49

ae galera alguém sabe pq acontece este erro em delphi?
[FATAL ERROR]Project1.dpr(5):Could not compíle used unit1 'Unit1.pas'
este é o erro e ae espero ajuda.flw

romulo · 26-10-2003, 18:54

Citação:

Postado Originalmente por Marcos Heringer

ae galera alguém sabe pq acontece este erro em delphi?
[FATAL ERROR]Project1.dpr(5):Could not compíle used unit1 'Un...

Você alterou o nome do arquivo Unit1.pas? Aparentemente ele não está encontrando esse arquivo.

Marcos Heringer · 27-10-2003, 11:33

o Unit 1 é o nome do projeto e eu não alterei nada, eu tentei mudar o nome mas naum adiantou nada.continuo perguntano q erro é esse

romulo · 27-10-2003, 11:52

Posta aí o conteúdo dos arquivos Project1.dpr e Unit1.pas.

Marcos Heringer · 27-10-2003, 20:00

ele é um pouco grande as aí vai este é o cod fonte do editor de texto q eu até desafiei o pessoal a fazer.

Citação:

unit editordetexto;

interface

uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, StdCtrls, Menus;

type
TForm1 = class(TForm)
MainMenu1: TMainMenu;
Arquivo1: TMenuItem;
Novo1: TMenuItem;
Abrir1: TMenuItem;
Salvar1: TMenuItem;
N1: TMenuItem;
Sair1: TMenuItem;
Editar1: TMenuItem;
Recortar1: TMenuItem;
Copiar1: TMenuItem;
Colar1: TMenuItem;
N2: TMenuItem;
SelecionarFonte1: TMenuItem;
Fonte1: TMenuItem;
Cor1: TMenuItem;
Negrito1: TMenuItem;
Itlico1: TMenuItem;
Memo1: TMemo;
OpenDialog1: TOpenDialog;
SaveDialog1: TSaveDialog;
FontDialog1: TFontDialog;
ColorDialog1: TColorDialog;
procedure Novo1Click(Sender: TObject);
procedure Abrir1Click(Sender: TObject);
procedure Salvar1Click(Sender: TObject);
procedure Sair1Click(Sender: TObject);
procedure Recortar1Click(Sender: TObject);
procedure Copiar1Click(Sender: TObject);
procedure Colar1Click(Sender: TObject);
procedure Fonte1Click(Sender: TObject);
procedure Cor1Click(Sender: TObject);
private
{ Private declarations }
public
{ Public declarations }
end;

var
Form1: TForm1;

implementation

{$R *.dfm}

procedure TForm1.Novo1Click(Sender: TObject);
begin
memo1.Clear;
recortar1.Enabled:=false;
copiar1.Enabled:=false;
colar1.Enabled:=false;
end;

procedure TForm1.Abrir1Click(Sender: TObject);
begin
if opendialog1.Execute then
memo1.lines.LoadFromFile(opendialog1.filename);
end;

procedure TForm1.Salvar1Click(Sender: TObject);
begin
if savedialog1.Execute then
memo1.Lines.SaveToFile(savedialog1.filename);
end;

procedure TForm1.Sair1Click(Sender: TObject);
begin
Close
end;

procedure TForm1.Recortar1Click(Sender: TObject);
begin
memo1.CutToClipboard;
colar1.Enabled:=true;
end;

procedure TForm1.Copiar1Click(Sender: TObject);
begin
memo1.copytoClipboard;
colar1.Enabled:=true;
end;

procedure TForm1.Colar1Click(Sender: TObject);
begin
memo1.pastefromclipboard;

end;

procedure TForm1.Fonte1Click(Sender: TObject);
begin
fontdialog1.Font:=memo1.Font;
if fontdialog1.Execute then
memo1.Font:=fontdialog1.Font;
end;

procedure TForm1.Cor1Click(Sender: TObject);
begin
colordialog1.Color:=memo1.Color;
if colordialog1.Execute then

end;

end.

se alguém puder ajudar eu agradeço

romulo · 27-10-2003, 20:09

Citação:

Postado Originalmente por Marcos Heringer

ele é um pouco grande as aí vai este é o cod fonte do editor de texto q eu até desafiei o pessoal a fazer.

O nome desse arquivo é "Unit1.pas" ou "editordetexto.pas"? Se for "Unit1.pas", então o erro é esse, o arquivo tem que ter o mesmo nome que a Unit.

Marcos Heringer · 27-10-2003, 20:27

o início do fonte está assim

Citação:

unit editordetexto;

igual tava antes.

GBastos · 28-10-2003, 15:57

Olha aí o famoso romulo!! :lol: Andou sumido...

Quanto a problema, posta aí o código do projeto q deve dar uma pista..

romulo · 28-10-2003, 16:16

Citação:

Postado Originalmente por GBastos

Olha aí o famoso romulo!! :lol: Andou sumido...

Quanto a problema, posta aí o código do projeto q deve dar uma pi...

Grande GBastos! :mrgreen:

Marcos, mas e quanto ao nome do arquivo? Faz o seguinte, vai na opção Project->View Source e posta o que está lá.

Marcos Heringer · 29-10-2003, 22:11

qnt GBastos o cód do arquivo está mais em cima.vou lá está escrito assim

Citação:

program Project1;

uses
Forms;

{$R *.res}

begin
Application.Initialize;
Application.Run;
end.

GBastos · 30-10-2003, 14:32

O código q eu me refiria é esse mesmo, o mesmo q romulo falou, o código do projeto (project source)..
Acho q tá faltando aí a unit q vc criou, o normal é algo do tipo:

Código:

program Project1;

uses
  Forms,
  Unit1 in 'UNIT1.PAS',

{$R *.RES}

begin
  Application.CreateForm(TForm1, Form1);
  Application.Run;
end.

Não to com o Delphi aqui mas acho q em tem uma opção em q vc adiciona isso e o Delphi coloca tudo automaticamente.. E lá na project options vc pode botar o form como autocreate para ele colocar a linha Application.CreateForm(TForm1, Form1)...

Marcos Heringer · 30-10-2003, 20:28

ta coloquei isso lá, mas coloquei o prog pra roda, ele naum roda e dá esse erro

Citação:

[Error] File not found: 'Unit1.dfm'

o qq é

GBastos · 31-10-2003, 14:31

Se vc salvou a unit editordetexto como editordetexto.pas, vc tem que colocar no uses: editordetexto in 'editordetexto.pas'

Marcos Heringer · 31-10-2003, 18:00

eu tentei fazer isso mas tbm naum deu jeito, ta dano erro acho q é erro de instalação no delphi vou tentar instalar de novo.flw

Moonlight · 03-11-2003, 17:55

Acho que não é erro do Delphi não hein. Se tudo que os colegas falarem não funcionar, tenta salvar a unit com outro nome (Save as...) e depois adicionar ela ao projeto novamente.. aí vc tira a outra do projeto.

GBastos · 03-11-2003, 19:23

Olha a Moon aí tb, esse é o topico dos sumidos é? :lol:
Além de fazer isso q a Moon falou, vc conseguiu achar a opção q adiciona a unit?

Marcos Heringer · 03-11-2003, 20:00

qual opção q adiciona a Unit? este negócio da Moon, naum deu pq o problema é no delphi, eu vou reinstalá-lo e vou ver se dá mas continuo na espera

Moonlight · 03-11-2003, 22:28

é o topico dos sumidos que querem voltar a aparecer

GBastos · 04-11-2003, 14:46

Hehehe, serão sempre bem vindos!

Citação:

Postado Originalmente por Marcos Heringer

qual opção q adiciona a Unit? este negócio da Moon, naum deu pq o problema é no delphi, eu vou reinstalá-lo e vou ver...

Marcos, se não me engano é Add to project, vc vai lá, informa o arquivo q vc quer e ai ele adiciona no project automaticamente... Aproveite e dê uma olhada se existe lá algum outro q não faça parte e aí vc vai em Remove from project e tira ele..

Marcos Heringer · 04-11-2003, 16:00

kras é o seguinte já fiz tdo e naum deu certo, mas eu continuo perguntano.Eu acho q o erro é do Delphi q eu instalei compact.flw

26-10-2003, 17:49	#1 (permalink)
Marcos Heringer Super Participante Registrado em: Sep 2003 Localização: Manhuaçu/MG Mensagens: 935 Reputação: 19	Erro em Delphi ae galera alguém sabe pq acontece este erro em delphi? [FATAL ERROR]Project1.dpr(5):Could not compíle used unit1 'Unit1.pas' este é o erro e ae espero ajuda.flw

27-10-2003, 11:52	#4 (permalink)
romulo Zumbi Registrado em: Dec 2001 Localização: Fortaleza / CE Mensagens: 7.506 Reputação: 31	Posta aí o conteúdo dos arquivos Project1.dpr e Unit1.pas. __________________ Minha coleção de jogos (todos originais)

28-10-2003, 15:57	#8 (permalink)
GBastos Super Participante Registrado em: Sep 2001 Localização: Salvador, Bahia Idade: 32 Mensagens: 770 Reputação: 22	Olha aí o famoso romulo!! :lol: Andou sumido... Quanto a problema, posta aí o código do projeto q deve dar uma pista.. __________________ Ever tried. Ever failed. No matter. Try again. Fail again. Fail better.

30-10-2003, 14:32	#11 (permalink)
GBastos Super Participante Registrado em: Sep 2001 Localização: Salvador, Bahia Idade: 32 Mensagens: 770 Reputação: 22	O código q eu me refiria é esse mesmo, o mesmo q romulo falou, o código do projeto (project source).. Acho q tá faltando aí a unit q vc criou, o normal é algo do tipo: Código: program Project1; uses Forms, Unit1 in 'UNIT1.PAS', {$R *.RES} begin Application.CreateForm(TForm1, Form1); Application.Run; end. Não to com o Delphi aqui mas acho q em tem uma opção em q vc adiciona isso e o Delphi coloca tudo automaticamente.. E lá na project options vc pode botar o form como autocreate para ele colocar a linha Application.CreateForm(TForm1, Form1)... __________________ Ever tried. Ever failed. No matter. Try again. Fail again. Fail better.

31-10-2003, 14:31	#13 (permalink)
GBastos Super Participante Registrado em: Sep 2001 Localização: Salvador, Bahia Idade: 32 Mensagens: 770 Reputação: 22	Se vc salvou a unit editordetexto como editordetexto.pas, vc tem que colocar no uses: editordetexto in 'editordetexto.pas' __________________ Ever tried. Ever failed. No matter. Try again. Fail again. Fail better.

		FórumGdH > Profissional > Programação, scripts, web e banco de dados
Erro em Delphi

1. Jogo da Velha em Delphi 2. erro em programar
Mais resultados? Use nossa pesquisa.

27-10-2003, 11:33	#3 (permalink)
Marcos Heringer Super Participante Registrado em: Sep 2003 Localização: Manhuaçu/MG Mensagens: 935 Reputação: 19	o Unit 1 é o nome do projeto e eu não alterei nada, eu tentei mudar o nome mas naum adiantou nada.continuo perguntano q erro é esse

31-10-2003, 18:00	#14 (permalink)
Marcos Heringer Super Participante Registrado em: Sep 2003 Localização: Manhuaçu/MG Mensagens: 935 Reputação: 19	eu tentei fazer isso mas tbm naum deu jeito, ta dano erro acho q é erro de instalação no delphi vou tentar instalar de novo.flw

03-11-2003, 17:55	#15 (permalink)
Moonlight Veterano Registrado em: Dec 2001 Localização: Goiânia Mensagens: 1.247 Reputação: 23	Acho que não é erro do Delphi não hein. Se tudo que os colegas falarem não funcionar, tenta salvar a unit com outro nome (Save as...) e depois adicionar ela ao projeto novamente.. aí vc tira a outra do projeto. __________________ Letícia Linux User: 253009 "Já vi o fim do mundo algumas vezes, e na manhã seguinte tava tudo bem..."

03-11-2003, 19:23	#16 (permalink)
GBastos Super Participante Registrado em: Sep 2001 Localização: Salvador, Bahia Idade: 32 Mensagens: 770 Reputação: 22	Olha a Moon aí tb, esse é o topico dos sumidos é? :lol: Além de fazer isso q a Moon falou, vc conseguiu achar a opção q adiciona a unit? __________________ Ever tried. Ever failed. No matter. Try again. Fail again. Fail better.

03-11-2003, 20:00	#17 (permalink)
Marcos Heringer Super Participante Registrado em: Sep 2003 Localização: Manhuaçu/MG Mensagens: 935 Reputação: 19	qual opção q adiciona a Unit? este negócio da Moon, naum deu pq o problema é no delphi, eu vou reinstalá-lo e vou ver se dá mas continuo na espera

03-11-2003, 22:28	#18 (permalink)
Moonlight Veterano Registrado em: Dec 2001 Localização: Goiânia Mensagens: 1.247 Reputação: 23	é o topico dos sumidos que querem voltar a aparecer __________________ Letícia Linux User: 253009 "Já vi o fim do mundo algumas vezes, e na manhã seguinte tava tudo bem..."

04-11-2003, 16:00	#20 (permalink)
Marcos Heringer Super Participante Registrado em: Sep 2003 Localização: Manhuaçu/MG Mensagens: 935 Reputação: 19	kras é o seguinte já fiz tdo e naum deu certo, mas eu continuo perguntano.Eu acho q o erro é do Delphi q eu instalei compact.flw

Opções do Tópico
Exibir Versão para Impressão Envie essa página por e-mail