Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > C/C++ программирование > C++ Builder
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 03.02.2017, 19:57   #1
mosvladislav
 
Регистрация: 23.01.2017
Сообщений: 5
По умолчанию C++ Builder [Linker Error] Unresolved external '_Form1'

При попытке скомпилировать программу, появляется ошибка
[Linker Error] Unresolved external '_Form1' referenced from C:\USERS\MOS\DESKTOP\grafika\PROJEC T2.OBJ
[Linker Error] Unresolved external 'TForm1::' referenced from C:\USERS\MOS\DESKTOP\grafika\PROJEC T2.OBJ

Вот код программы
unit1.cpp

Код:
#include <vcl.h>
#include <math.h>
#pragma hdrstop

#include "Unit1.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma link "sEdit"
#pragma link "sSpinEdit"
#pragma resource "*.dfm"
TForm1 *Form1;
int dir = 1;  // напрвление движение
long int color1 = RGB(255,255,0);  // цвет объекта
long int color2 = 0;
double scale = 1;  // масштаб объекта
//---------------------------------------------------------------------------
__fastcall TForm1::TForm1(TComponent* Owner)
        : TForm(Owner)
{
}
//---------------------------------------------------------------------------
void TForm1::star_in_circle (TPoint center, int outer_radius, int inner_radius, int beam_count, double scale, TColor color1, double angle)
{
  Refresh();
 
  
  outer_radius *= scale;
  inner_radius *= scale;
 
 
  //Canvas->Pen->Color = color1;
  Canvas->Brush->Color = color1;
  Canvas->Ellipse(center.x - outer_radius, center.y - outer_radius, center.x + outer_radius + 1, center.y + outer_radius + 1);
 
  // переходим в "начальную точку" звезды
  Canvas->MoveTo(center.x+sin(angle)*outer_radius, center.y-cos(angle)*outer_radius);
  // рисуем лучи
  for (int i = 1; i <= beam_count; i++)
  {
    Canvas->LineTo(center.x+sin(angle+(i*2-1)*M_PI/beam_count)*inner_radius, center.y-cos(angle+(i*2-1)*M_PI/beam_count)*inner_radius);
    Canvas->LineTo(center.x+sin(angle+(i*2-3)*M_PI/beam_count)*inner_radius, center.y-cos(angle+(i*2-3)*M_PI/beam_count)*inner_radius);
    Canvas->MoveTo(center.x+sin(angle+(i*2-1)*M_PI/beam_count)*inner_radius, center.y-cos(angle+(i*2-1)*M_PI/beam_count)*inner_radius);
    Canvas->LineTo(center.x+sin(angle+i*2*M_PI/beam_count)*outer_radius, center.y-cos(angle+i*2*M_PI/beam_count)*outer_radius);
  }
}
   
void __fastcall TForm1::Button1Click(TObject *Sender)
{
/*Tag = 0;
  Timer1->Tag = 0;
  dir = 1;
  color = 0;
  scale = StrToFloatDef(Edit4->Text, 1) / StrToFloatDef(Edit5->Text, 1);*/
  // скорость движения и масштаб
   //Timer1->Interval = sSpinEdit1->MaxValue - sSpinEdit1->Value + 1;
  //scale = StrToFloatDef(Edit4->Text, 1) / StrToFloatDef(Edit5->Text, 1);

  Timer1->Enabled = 1;

}
//---------------------------------------------------------------------------
void __fastcall TForm1::Timer1Timer(TObject *Sender)
{
   // скорость движения и масштаб
   Timer1->Interval = sSpinEdit1->MaxValue - sSpinEdit1->Value + 1;
  scale = StrToFloatDef(Edit4->Text, 1) / StrToFloatDef(Edit5->Text, 1);

  //  радиусы и кол-во лучей
  int outer_radius = 90, inner_radius = 45, beam_count = 6;
  //  кординаты центра фигуры
  int x = Tag+outer_radius*scale, y = -100*sin(Tag*180./ClientWidth/15/M_PI)+ClientHeight-outer_radius*scale-1;

  // фигура строится вначале в левом нижнем углу, туда и возвращается
  star_in_circle(TPoint(x, y), outer_radius, inner_radius, beam_count, scale, TColor(RGB(color1*1, color1*15, color1*254)), Tag*180./M_PI/ClientWidth/50*sSpinEdit2->Value);

  // проверка на достижение фигурой границ формы
  if (((x+outer_radius*scale >= ClientWidth || y-outer_radius*scale <= 0 || y+outer_radius*scale >= ClientHeight) && dir > 0) || (x-outer_radius*scale <= 0 && dir < 0))
  {
    // меняем направление движения
    dir *= -1;
    Timer1->Enabled = 0;
    // задаем время, через которое фигура начнет двигаться в другую сторону
    Timer2->Interval = sSpinEdit3->Value*1000 + 1;
    Timer2->Enabled = 1;
  }

   // смещаем фигуру
  Tag += dir;
  //Timer1->Tag++;
  // изменяем цвет
  color1++;
 }
//---------------------------------------------------------------------------
void __fastcall TForm1::Timer2Timer(TObject *Sender)
{
  Timer2->Enabled = 0;
  Timer1->Enabled = 1;
}
//---------------------------------------------------------------------------
void __fastcall TForm1::FormCreate(TObject *Sender)
{
Timer1->Enabled = 0;
}
//---------------------------------------------------------------------------

void __fastcall TForm1::Button2Click(TObject *Sender)
{
 Timer1->Enabled = 0;
}


unit1.h
Код:
#ifndef Unit1H
#define Unit1H
//---------------------------------------------------------------------------
#include <Classes.hpp>
#include <Controls.hpp>
#include <StdCtrls.hpp>
#include <Forms.hpp>
#include <ComCtrls.hpp>
#include <ExtCtrls.hpp>
#include "sEdit.hpp"
#include "sSpinEdit.hpp"
//---------------------------------------------------------------------------
class TForm1 : public TForm
{
__published:	// IDE-managed Components
        TEdit *Edit4;
        TEdit *Edit5;
        TButton *Button1;
        TTimer *Timer1;
        TTimer *Timer2;
        TsSpinEdit *sSpinEdit1;
        TsSpinEdit *sSpinEdit2;
        TsSpinEdit *sSpinEdit3;
        TButton *Button2;
        TLabel *Label1;
        TLabel *Label2;
        TLabel *Label3;
        TLabel *Label4;
        TLabel *Label5;
        void __fastcall Button1Click(TObject *Sender);
        void __fastcall Timer1Timer(TObject *Sender);
        void __fastcall Timer2Timer(TObject *Sender);
        void __fastcall FormCreate(TObject *Sender);
        void __fastcall Button2Click(TObject *Sender);
private:	// User declarations
public:		// User declarations
        __fastcall TForm1(TComponent* Owner);
        void TForm1::star_in_circle (TPoint center, int outer_radius, int inner_radius, int beam_count, double scale, TColor color, double angle);
};
//---------------------------------------------------------------------------
extern PACKAGE TForm1 *Form1;
//---------------------------------------------------------------------------
#endif
mosvladislav вне форума Ответить с цитированием
Старый 03.02.2017, 20:37   #2
ura_111
Участник клуба
 
Регистрация: 14.05.2016
Сообщений: 1,793
По умолчанию

ПЕРЕЙДИ НА СТР.2

Последний раз редактировалось ura_111; 03.02.2017 в 23:16.
ura_111 вне форума Ответить с цитированием
Старый 03.02.2017, 20:50   #3
mosvladislav
 
Регистрация: 23.01.2017
Сообщений: 5
По умолчанию

Вот
Вложения
Тип файла: rar grafika.rar (573.7 Кб, 12 просмотров)
mosvladislav вне форума Ответить с цитированием
Старый 03.02.2017, 21:07   #4
ura_111
Участник клуба
 
Регистрация: 14.05.2016
Сообщений: 1,793
По умолчанию

ПЕРЕЙДИ НА СТР.2

Последний раз редактировалось ura_111; 03.02.2017 в 23:16.
ura_111 вне форума Ответить с цитированием
Старый 03.02.2017, 21:24   #5
ura_111
Участник клуба
 
Регистрация: 14.05.2016
Сообщений: 1,793
По умолчанию

ПЕРЕЙДИ НА СТР.2

Последний раз редактировалось ura_111; 03.02.2017 в 23:15.
ura_111 вне форума Ответить с цитированием
Старый 03.02.2017, 21:34   #6
ura_111
Участник клуба
 
Регистрация: 14.05.2016
Сообщений: 1,793
По умолчанию

ПЕРЕЙДИ НА СТР.2

Последний раз редактировалось ura_111; 03.02.2017 в 23:15.
ura_111 вне форума Ответить с цитированием
Старый 03.02.2017, 22:04   #7
ura_111
Участник клуба
 
Регистрация: 14.05.2016
Сообщений: 1,793
По умолчанию

ПЕРЕЙДИ НА СТР.2

Последний раз редактировалось ura_111; 03.02.2017 в 23:15.
ura_111 вне форума Ответить с цитированием
Старый 03.02.2017, 22:25   #8
mosvladislav
 
Регистрация: 23.01.2017
Сообщений: 5
По умолчанию

компоненты alpha controls. Пересоздал проект, все компилируются, но после сохранения и попытке скомпилировать, возникают те же ошибки
mosvladislav вне форума Ответить с цитированием
Старый 03.02.2017, 22:28   #9
ura_111
Участник клуба
 
Регистрация: 14.05.2016
Сообщений: 1,793
По умолчанию

ПЕРЕЙДИ НА СТР.2

Последний раз редактировалось ura_111; 03.02.2017 в 23:15.
ura_111 вне форума Ответить с цитированием
Старый 03.02.2017, 22:30   #10
mosvladislav
 
Регистрация: 23.01.2017
Сообщений: 5
По умолчанию

роцкер :D
mosvladislav вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц

Опции темы Поиск в этой теме
Поиск в этой теме:

Расширенный поиск


Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
[Linker error] Unresolved internal... Chicho C++ Builder 14 25.03.2015 13:25
[Linker error] Unresloved external... Томми Круглый Общие вопросы C/C++ 9 23.06.2011 12:46
LIBCD.lib(crt0.obj) : error LNK2001: unresolved external symbol _main Debug/main.exe : fatal error LNK11 prefak Win Api 0 19.04.2009 16:51