[Fatal Error] Project1.dpr(5): File not found: 'vrunl.dcu'

[HackerOK]

Что это значит?

[Greblin]

Файл vrunl.dcu не найден. Судя по всему, у вас в uses есть модуль vrunl, который дельфя найти не может

[HackerOK]

Блин а че надо сделать чтобы прога заработала?

unit Unit1;

interface

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

type
  TForm1 = class(TForm)
    Edit1: TEdit;
    Edit2: TEdit;
    Label1: TLabel;
    Label2: TLabel;
    Label3: TLabel;
    Label4: TLabel;
    Button1: TButton;
    Button2: TButton;
    procedure Edit1Change(Sender: TObject);
    procedure Button1Click(Sender: TObject);
    procedure Button2Click(Sender: TObject);
  private
    { Private declarations }
  public
    { Public declarations }
  end;

var
  Form1: TForm1;

implementation

{$R *.dfm}

procedure TForm1.ButtonlClick(Sender: TObject);


var


dist : integer;


t: real;


min : integer;

sek : integer;


v: real;


begin




dist := StrToint(Edit1.Text); t := StrToFloat(Edit2.Text);





min := Trunc(t);


sek := Trunc(t*100) mod 100; 







v := (dist/1000) / ((min*60 + sek)/3600);




label4.Caption := 'Дистанция: '+ Edit1.Text 

+ ' м' + #13 + 'Время: ' + IntToStr(min) 

+ ' мин ' + IntToStr(sek) + ' сек ' + #13 +


'Скорость: ' + FloatToStrF(v,ffFixed,4,2) + ' км/час';


end;



procedure TForm1.Button2Click(Sender: TObject);


begin


Form1.Close;


end;


end.

[Vol666]

Случается когда один файл остаётся Unit1.pas другой называешь FigEgo1.dcu и потом нехотит работать, та же ошибка...

[Greblin]

Сделайте Project -> View Source и скиньте код

[HackerOK]

Сообщение от Greblin

Найти файл vrunl.dcu или vrunl.pas и засунуть в папку с программой, например

Где мне его искать???))

[Vol666]

Я проблему решал так все файлы которые относятся к Форме1 переименовываю вот как на скрине. И тогда всё ок всё открывает и компилит.

[HackerOK]

program Project1;
uses

Forms,vrun1 in 'vrunl.pas' {Form1};

{$R *.res}

begin

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

Сообщение от Vol666

Я проблему решал так все файлы которые относятся к Форме1 переименовываю вот как на скрине. И тогда всё ок всё открывает и компилит.

я ваще никаких файлов не создавал тока оболочку и код программы и все

[Greblin]

замените vrun1 (в том числе в кавычках) на Unit1
+ в Unit1 уберите эту строку
procedure Edit1Change(Sender: TObject);
эта процедура у вас всё равно не описана

[Пепел Феникса]

а модуль называет unit1
пересохраните его