0 / 0 / 0
Регистрация: 11.05.2018
Сообщений: 1

Ошибка: Class does not have a default property

11.05.2018, 08:57. Показов 3361. Ответов 1
Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам
Выдает ошибку "E2149 Class does not have a default property" на ' G:=StrToFloat(StringGrid2[1,i]); ' .Не могу понять почему. Весь код ниже
Delphi
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
interface
 
uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs, StdCtrls, ExtCtrls, Grids;
 
type
  TSDIAppForm = class(TForm)
    StringGrid1: TStringGrid;
    StringGrid2: TStringGrid;
    StringGrid3: TStringGrid;
    Label1: TLabel;
    Label2: TLabel;
    Label3: TLabel;
    Button1: TButton;
    StringGrid4: TStringGrid;
    Label4: TLabel;
    StringGrid5: TStringGrid;
    Label5: TLabel;
    Label6: TLabel;
    StringGrid6: TStringGrid;
    Label7: TLabel;
 
    procedure Button1Click(Sender: TObject);
  private
    { Private declarations }
  public
    { Public declarations }
  end;
 
var
  SDIAppForm: TSDIAppForm;
  T:Boolean;
  G:Real;
implementation
 
uses About;
 
{$R *.dfm}
Function MinKom(Name:TStringGrid):integer;
var i,minim:integer; p:real;
begin
  With Name do
  begin
    p:= StrToFloat(Name[1]);
    minim:=1;
    for i := 1 to ColCount-1 do
    begin
      if StrToFloat(Name[i])<p then begin
        p:=StrToFloat(Name[i]);
        minim:=i;
      end;
 
    end;
 
  end;
  MinKom:=minim;
end;
 
 
procedure TSDIAppForm.Button1Click(Sender: TObject);
var i,j:integer;
begin
 
  for i := 1 to MinKom(StringGrid2)-1 do begin
  G:=StrToFloat(StringGrid2[1,i]);
  StringGrid5.Cells[1,i]:=FloatToStr(G*G)
  end;
  if MinKom(StringGrid3)<=3 then T:=true else T:=False;
  if T=True then
  StringGrid4.Cells[1,1]:='True' else StringGrid4.Cells[1,1]:='False';
  StringGrid6.Cells[1,1]:=IntToStr(MinKom(StringGrid1));
 
end;
 
end.
0
cpp_developer
Эксперт
20123 / 5690 / 1417
Регистрация: 09.04.2010
Сообщений: 22,546
Блог
11.05.2018, 08:57
Ответы с готовыми решениями:

Ошибка: E2149 class does not have a default property
не понимаю где ошибка procedure TForm2.Button1Click(Sender: TObject); var iq: integer; begin listbox1.MultiSelect:=true; ...

Ошибка Cannot find default constructor to initialize base class
class CompGame: public TForm { public: int z; CompGame(int l=0){z=l;} };есть класс примерно токого типа при компиляция...

Ошибка javax.naming.NoInitialContextException: Need to specify class name in environment or system property, or as an applet parameter
Целый день немогу ошибку исправить. javax.naming.NoInitialContextException: Need to specify class name in environment or system...

1
Почетный модератор
 Аватар для Puporev
64312 / 47609 / 32742
Регистрация: 18.05.2008
Сообщений: 115,168
11.05.2018, 09:14
Delphi
1
G:=StrToFloat(StringGrid2.Cells[1,i]);
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
raxper
Эксперт
30234 / 6612 / 1498
Регистрация: 28.12.2010
Сообщений: 21,154
Блог
11.05.2018, 09:14
Помогаю со студенческими работами здесь

Использование Class & Property
Есть вопрос: Надо в классе зафиговать такую пропертю, чтобы когда я писал Object.PropertyName= у меня вываливались выбор значений...

E2251 Cannot find default constructor to initialize base class
Здравствуйте. Столкнулся с данной ошибкой: class fCountry { public: fCoutry(void) ...

E2251 Cannot find default constructor to initialize base class TImage
Идея такая.. хочу сделать создание объекта моего класса, который является наследником TImage. Ошибка-собственно сабж... Как я понимаю, он...

[C++ Error] Unit1.cpp(14): E2251 Cannot find default constructor to initialize base class 'TForm'
Подскажите как исправить ошибку, см рисунок.

Java + Hibernate: Could not find a setter for property Type in class Entity.Disk
Здравствуйте всем!! В общем то помогите победить вот такую ошибку: Could not find a setter for property Type in class Entity.Disk ...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
2
Ответ Создать тему
Опции темы

Новые блоги и статьи
Мысли в слух
kumehtar 07.11.2025
Заметил среди людей, что по-настоящему верная дружба бывает между теми, с кем нечего делить.
Новая зверюга
volvo 07.11.2025
Подарок на Хеллоуин, и теперь у нас кроме Tuxedo Cat есть еще и щенок далматинца: Хочу еще Симбу взять, очень нравится. . .
Инференс ML моделей в Java: TensorFlow, DL4J и DJL
Javaican 05.11.2025
Python захватил мир машинного обучения - это факт. Но когда дело доходит до продакшена, ситуация не так однозначна. Помню проект в крупном банке три года назад: команда data science натренировала. . .
Mapped types (отображённые типы) в TypeScript
Reangularity 03.11.2025
Mapped types работают как конвейер - берут существующую структуру и производят новую по заданным правилам. Меняют модификаторы свойств, трансформируют значения, фильтруют ключи. Один раз описал. . .
Адаптивная случайность в Unity: динамические вероятности для улучшения игрового дизайна
GameUnited 02.11.2025
Мой знакомый геймдизайнер потерял двадцать процентов активной аудитории за неделю. А виновником оказался обычный генератор псевдослучайных чисел. Казалось бы - добавил в карточную игру случайное. . .
Протоколы в Python
py-thonny 31.10.2025
Традиционная утиная типизация работает просто: попробовал вызвать метод, получилось - отлично, не получилось - упал с ошибкой в рантайме. Протоколы добавляют сюда проверку на этапе статического. . .
C++26: Read-copy-update (RCU)
bytestream 30.10.2025
Прошло почти двадцать лет с тех пор, как производители процессоров отказались от гонки мегагерц и перешли на многоядерность. И знаете что? Мы до сих пор спотыкаемся о те же грабли. Каждый раз, когда. . .
Изображения webp на старых x32 ОС Windows XP и Windows 7
Argus19 30.10.2025
Изображения webp на старых x32 ОС Windows XP и Windows 7 Чтобы решить задачу, использовал интернет: поисковики Google и Yandex, а также подсказки Deep Seek. Как оказалось, чтобы создать. . .
Passkey в ASP.NET Core identity
stackOverflow 29.10.2025
Пароли мертвы. Нет, серьезно - я повторяю это уже лет пять, но теперь впервые за это время чувствую, что это не просто красивые слова. В . NET 10 команда Microsoft внедрила поддержку Passkey прямо в. . .
Последние результаты исследования от команды MCM (октябрь 2025 г.)
Programma_Boinc 29.10.2025
Последние результаты исследования от команды MCM (октябрь 2025 г. ) Поскольку мы продолжаем изучать гены, которые играют ведущую роль в развитии рака, в рамках проекта "Картирование раковых. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2025, CyberForum.ru