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

Подскажите, что не так?   Найти похожие ветки 

← →
Bloody-Wolf ©   (2005-02-28 13:41) [0]

Мастера, я не могу понять, почему не работает следующий кусок программы:

procedure TForm1.Button1Click(Sender: TObject);
type
car = "a".."z";
var
tm: car;
begin
if form1.Edit1.Text[3]= tm then
begin
form1.Edit2.Text:="Successful";
end;
end;

Delphi пишет <Variable "tm" might not have been initiolized>
но проект компилит, а когра доходит до проверки условия, то в
form1.Edit2.Text ничего не показывает, хотя условие спецом задается правильное.

---

← →
Александр Иванов ©   (2005-02-28 13:46) [1]

Переменной tm не задано значение

---

← →
Bloody-Wolf ©   (2005-02-28 13:48) [2]

и как мне тогда проверить, подпадает ли 3 буква в строке под набор?

---

← →
Bloody-Wolf ©   (2005-02-28 13:50) [3]

а все, спасибо, я уже догнал как, и все получилось.

---

← →
Плохиш ©   (2005-02-28 13:51) [4]

... in ["a".."z"]
... >= "a" and ... <= "z"

---

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

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



Память: 0.45 MB
Время: 0.047 c