Подскажите, что не так?

← →
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]

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

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

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