DBEDIT

[ggod]

добрый день как проверить пустой ли dbedit?
P.S.
(нужна проверка и showmessage('значение не указано'))

[GoodDA]

вроде так
if dbedit.datasource.dataset.fieldbyna me(dbedit.fieldname).asstring ='' then

[ggod]

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

вроде так
if dbedit.datasource.dataset.fieldbyna me(dbedit.fieldname).asstring ='' then

if dbedit.datasource.dataset.fieldbyna me(dbedit.?).asstring='' then

невозможно поставит fieldname

[vovk]

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

if dbedit.datasource.dataset.fieldbyna me(dbedit.?).asstring='' then

невозможно поставит fieldname

возможно вот так

if dbedit.datasource.dataset.fieldbyname(DBEdit.DataField).asstring='' then

, но не за чем,
проще так

if dbedit.field.asstring='' then

ЗЫ
Хотя разницы никакой, просто кода меньше

[GoodDA]

а что пишет? может ошибку дето допустили?

тогда просто if dbedit1.Text='' then пробуйте

[rdama]

IF Length(DBEdit.DataSource.DataSet.FieldByName(DBEdit.DataField).ASString) > 0 THEN ShowMessage('Is Not Empty')
ELSE ShowMessage('IS Empty');

[xxbesoxx]

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

IF Length(DBEdit.DataSource.DataSet.FieldByName(DBEdit.DataField).ASString) > 0 THEN ShowMessage('Is Not Empty')
ELSE ShowMessage('IS Empty');

DBEdit ест свойства DataSource и DataField там надо написать только

ADOQuery.Insert;
ADOQuery.post;

[Yurk@]

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

IF Length(DBEdit.DataSource.DataSet.FieldByName(DBEdit.DataField).ASString) > 0 THEN ShowMessage('Is Not Empty')
ELSE ShowMessage('IS Empty');

некчему такие сложности ... проще:

IF Length(Trim(DBEdit.Text)) = 0 
  THEN ShowMessage('IS Empty');