Проблема с компиляцией.

[EmpoRio]

Я написал программу, алгоритм написал только на кнопки, т.к мне не нужно полностью писать... Компиляция не проходит((( Подскажите что не так?

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

а вы код покажите, и ошибки желательно какие.
ибо мы не знаем что вы там понаписали.

[EmpoRio]

unit Unit1;
interface

uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, StdCtrls, ExtCtrls, ComCtrls, FileCtrl;
type
TForm1 = class(TForm)
Label1: TLabel;
ProgressBar1: TProgressBar;
Button1: TButton;
Button2: TButton;
Button3: TButton;
Button4: TButton;
Panel1: TPanel;
Button5: TButton;
Label2: TLabel;
Edit1: TEdit;
Button6: TButton;
FileListBox1: TFileListBox;
procedure Button2Click(Sender: TObject);
procedure Button4Click(Sender: TObject);
procedure Button5Click(Sender: TObject);
procedure Button3Click(Sender: TObject);
procedure Button6Click(Sender: TObject);
procedure Panel1Click(Sender: TObject);
procedure Button1Click(Sender: TObject);
private
{ Private declarations }
public
{ Public declarations }
end;
var
Form1: TForm1;
implementation
{$R *.dfm}
procedure TForm1.Button1Click(Sender: TObject);
begin
MsgBox('Error42', 'Установите подлинную версию Windows!');
end;

procedure TForm1.Button2Click(Sender: TObject);
begin
ShowMessage('Телефон не был подключен!');
end;
procedure TForm1.Button3Click(Sender: TObject);
begin
ShowMessage('Error45');
end;
procedure TForm1.Button4Click(Sender: TObject);
begin
ShowMessage('Телефон не обнаружен!');
end;
procedure TForm1.Button5Click(Sender: TObject);
begin
ShowMessage('Нет сведений о данных');
end;
procedure TForm1.Button6Click(Sender: TObject);
begin
if MessageDlg('Выходим из программы?', mtConfirmation, [mbYes, mbNo], 0) = mrYes
then close;
end;
procedure TForm1.Panel1Click(Sender: TObject);
begin
If OpenDialog1.Execute Then
OpenDialog1.Filename;
end;
end.

Вот собственно код...

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

а ругается как?

[EmpoRio]

Никак. На нажатия соответственных клавиш не реагирует. А в меню "Run" вообще нельзя выбрать! Может причина в том что у меня Windows 7? Ставил уже 2 версии Delphi, не на одной компиляция не проходит.

[T_I_T_A_N]

ты наверно создал одну форму а надо когда создаешь новый проек выбирать vcl Application

сохрани эту форму что ты сделал куда ни будь.. потом создай новый проект Application, выбире projecr> remove from project и удали фрму.. потом свою форму где сохранил выбери add to projecr

[EmpoRio]

T_I_T_A_N, Спасибо большое....

Простите меня за мусор на форуме. Я просто вообще новичок.. Тему офф.