![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
В чом ошыбка?
Blaster © (2005-01-19 23:46:00)Я новичок в это деле,помагите в чом тут ошыбка?
procedure TForm1.Button1Click(Sender: TObject);
var n: string;
var m: string ;
begin
n:=length('samir');
m:=length('kimona');
edit1.Text:=n+m;
end;
end.
SergP (2005-01-20 21:06:00) [1]
> В ч ом ош ыбка?
Судя по сабжу - в ДНК.
боби (2005-01-20 19:08:00) [2]> В чом ошыбка?
ERROR HAS YOU
Knight (2005-01-20 19:06:00) [3]
> Poirot © (20.01.05 19:02)
%)
боби (2005-01-20 19:04:00) [4]ну и программеры растут......
Poirot (2005-01-20 19:02:00) [5]Knight © (20.01.05 18:52) [11]
пойду с горя напишу очередную фичу :((
Knight (2005-01-20 18:52:00) [6]
> [10] Poirot © (20.01.05 09:31)
Наверно ты из гумунитария уже вырос, а до программера ещё не дорос... %)
Poirot (2005-01-20 09:31:00) [7]Это всё школа Барсика видимо:)
Knight © (20.01.05 02:00) [9]
Видимо я вообще смесь и того и того - я и ошыбку нашёл и над кодом долго смеялся:) Бедный мой животик:))
Knight (2005-01-20 02:00:00) [8]
> [7] palva © (20.01.05 00:39)
> Главную ошибку вы и не заметили
Всё правильно... мозг работает избирательно, поэтому, каждый видит своё...
гуманитарий - в первую очередь ошибки в словах...
программист - в коде... остальное для него не существует
%)
KilkennyCat (2005-01-20 01:57:00) [9]Как иногда говорится, ошибка в ДНК, что гораздо раньше [7]
palva (2005-01-20 00:39:00) [10]Главную ошибку вы и не заметили
В чом ошыбка?даже две.
Всё с этого начинается.
Yanis (2005-01-20 00:33:00) [11]Первый вариант вообще не болжен работать :) там надо
n:=StrToInt((length('samir'));
m:=StrToInt(length('kimona'));
заменить на
n:=IntToStr((length('samir'));
m:=IntToStr(length('kimona'));
> и по первому варианту будет 56, по второму 11
ну да. Там же строки складываются :)
Anatoly Podgoretsky (2005-01-20 00:23:00) [12]и по первому варианту будет 56, по второму 11
Yanis (2005-01-20 00:14:00) [13]Я такое вообще первый раз вижу. Это нечто. Не знаю что сказать :) Можно так и так:
var n: string;
var m: string ;
begin
n:=StrToInt((length('samir'));
m:=StrToInt(length('kimona'));
edit1.Text:=IntToStr(n+m);
или же
var n: integer;
var m: integer;
begin
n:=length('samir');
m:=length('kimona');
edit1.Text:=IntToStr(n+m);
Profi (2005-01-19 23:59:00) [14]Это прикол что ли? Ошибка на ошибке! Два var'а, n и m типа string, а им присваевают число, и когда edit1.Text:=n+m;то если n и m все же строки
inttostrне надо!
palva (2005-01-19 23:52:00) [15]edit1.Text:=n+m;
Правую часть нужно предварительно перевести в строку
edit1.Text:=IntToStr(n+m);
(Вроде бы только что на такой же вопрос отвечали.)
Vasya.ru (2005-01-19 23:52:00) [16]var один раз пиши:
var
n : string;
m : string;