[Lenovo]

Я вам наверно надоел уже, но все же)
Подскажите пожалуйста чайнику, как записать эти строчки правильно если в БД таблице тип данных текстовый?

Код:

DataModule3.Glavnaya.Last;
begin
Label12.Caption:=FloatToStr(DataModule3.Glavnaya.FieldByName('VVisotnaya_otmetka_konca').AsFloat);
Label12.Caption:=Label12.Caption+' '+'м';

Смысл в том, что последняя строчка в таблице отображается в label-е. Но если таблица пустая выдает ошибку Float т.е пустое значение!

[angvelem]

____________________

[Lenovo]

Сообщение от angvelem

Закрой в try-except-end.
И если тип текстовый, зачем представлять его как asFloat?

Не понял? По подробнее можно пожалуйста? Кого закрывать?
Изначально был числовой, переделал по нужде в текстовый! Как теперь переделать код под текстовый тип? Распишите пожалуйста для чайника..

[angvelem]

____________________

[Lenovo]

Сообщение от angvelem

Попытайся так, но обрати внимание, под управлением Дельфи и при пустой строке всё равно выдаст ошибку.

Код:

  try
    Label12.Caption:=FloatToStr(DataModule3.Glavnaya.FieldByName('VVisotnaya_otmetka_konca').AsFloat);
  except
    Label12.Caption:='';
  end'

Я не правильно читаю?

Не понимаю вас, этой ошибки флоат избежать никак нельзя? Может сам код как-то переделать можно под текстовый тип? Мне надо чтобы был одинаковый исход!

[angvelem]

____________________

[Lenovo]

Сообщение от angvelem

Хочешь переделывай, хочешь оставляй как есть. Пример будет работать верно, когда запустишь EXE-шник, а под УПРАВЛЕНИЕМ Дельфи ошибка будет проявляться. Можно конечно и запретить в нстройках, но тогда что-нибудь пропустишь.

Проблема была озвучена выше при создании топа, и просьба была переделать! Спасибо вам за стремление помочь конечно, но ответом не удовлетворен =)

Жду адекватной и реально помощи ребят, а не просто побеседовать ))

[lmikle]

TryStrToFloat.
Функция довольно забавная, похоже она пытается все, что может, сконвертить.

[icWasya]

Сообщение от Lenovo

Я вам наверно надоел уже, но все же)
Подскажите пожалуйста чайнику, как записать эти строчки правильно если в БД таблице тип данных текстовый?

зачем писать .AsFloat, когда нужен текст?
пишите .AsString, и будет счастье.

[Lenovo]

Ничего не выходит, прошу о помощи..

[_taddy]

if DataModule3.Glavnaya.RecordCount <> 0 then
Label12.Caption:=FloatToStr(DataModule3.Glavnaya.F ieldByName('VVisotnaya_otmetka_konca').AsFloat)
else
Label12.Caption:='';

[Ildar-tsr]

Сообщение от _taddy

if DataModule3.Glavnaya.RecordCount <> 0 then
Label12.Caption:=FloatToStr(DataModule3.Glavnaya.F ieldByName('VVisotnaya_otmetka_konca').AsFloat)
else
Label12.Caption:='';

Код:

Label12.Caption:= DataModule3.Glavnaya.FieldByName('VVisotnaya_otmetka_konca').AsString