Скачать: CL | DM;

Не пойму почему код работает :)   Найти похожие ветки 

← →
isasa ©   (2007-01-04 10:28) [40]

KSergey ©   (04.01.07 09:52) [37]

Я что-то никак не пойму о чем тут говорят...
В исходном вопросе все работает, очевидно, потому, что метод EvaluateDiscriminant класса TEquation не обращается к полям этого класса.

Ну вот, все испортил. :)
Ну а если сдвинув брови вещать, то

... не обращается к полям объекта этого класса ...

---

← →
Контра   (2007-01-04 10:53) [41]

... не обращается к полям объекта этого класса ...

...полям данных экземпляра класса...

---

← →
Kolan ©   (2007-01-04 11:22) [42]

> [37] KSergey ©   (04.01.07 09:52)

О наконец я понял. :)

---

← →
$Pl@Sh ©   (2007-01-04 12:57) [43]

Обычно задают вопросы типа "почему не работает", ИМХО на них отвечать проще :-)

---

← →
Anatoly Podgoretsky ©   (2007-01-04 18:04) [44]

> $Pl@Sh  (04.01.2007 12:57:43)  [43]

> Обычно задают вопросы типа "почему не работает", ИМХО на них отвечать проще :-)

С какой стати.

---

← →
isasa ©   (2007-01-04 18:38) [45]

Контра   (04.01.07 10:53) [41]

В паре object/instance -> объект/образец, мне больше объект нравится.
А вы каким переводчиком пользуетесь? :)

---

← →
$Pl@Sh ©   (2007-01-04 20:40) [46]

> Anatoly Podgoretsky ©   (04.01.07 18:04) [44]


Ну как с какой стати, если тебе напишут почему не работает, то можно указать на ошибку и все заработает, а если почему работает, то.... Ну я не знаю, сложней объяснить, да и вопросы разные бывают. Например, почему работает вот такой код:

var i : integer;
begin
i := strtoint(edit1.text);
end;

почему работает????

---

← →
Anatoly Podgoretsky ©   (2007-01-04 21:47) [47]

> $Pl@Sh  (04.01.2007 20:40:46)  [46]

Это не рабочий код

---

← →
$Pl@Sh ©   (2007-01-04 21:59) [48]

> Anatoly Podgoretsky ©   (04.01.07 21:47) [47]


Это часть рабочего кода

---

← →
Anatoly Podgoretsky ©   (2007-01-04 22:11) [49]

> $Pl@Sh  (04.01.2007 21:59:48)  [48]

Тогда зачем приводишь незначимую часть

---

← →
$Pl@Sh ©   (2007-01-04 22:13) [50]

> Anatoly Podgoretsky ©   (04.01.07 22:11) [49]


Ну вот весь код:

unit Unit1;

interface

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

type
 TForm1 = class(TForm)
   Edit1: TEdit;
   Button1: TButton;
   procedure Button1Click(Sender: TObject);
 private
   { Private declarations }
 public
   { Public declarations }
 end;

var
 Form1: TForm1;

implementation

{$R *.dfm}

procedure TForm1.Button1Click(Sender: TObject);
var i : integer;
begin
i := strtoint(edit1.text);

end;

end.



Почем уработает?

---

← →
Sergey Masloff   (2007-01-04 22:31) [51]

$Pl@Sh ©   (04.01.07 22:13) [50]
Edit1.Text ;= "Бла-бла"

Все еще работает?
А компилятор ничего не говорит насчет того что присвоенное значение нигде не используется?

---

← →
$Pl@Sh ©   (2007-01-04 22:32) [52]

> Все еще работает?
> А компилятор ничего не говорит насчет того что присвоенное
> значение нигде не используется?


Говорит, но работает же...

---

← →
isasa ©   (2007-01-04 22:38) [53]

$Pl@Sh ©   (04.01.07 22:32) [52]
Говорит, но работает же...

Разное поведение кода на разніх машинах на набор значений
"1,25" и "1.25"

---

← →
isasa ©   (2007-01-04 22:39) [54]

Сорри пропетрил  strtoint ... :)

---

← →
$Pl@Sh ©   (2007-01-04 22:41) [55]

> isasa ©   (04.01.07 22:39) [54]


:-)

---

Страницы: 1 2 вся ветка

Скачать: CL | DM;



Память: 0.54 MB
Время: 0.053 c