Проверка заполнения

← →
BIG_BROTHER (2003-09-02 20:55) [0]

Надо проверить заполнение Edit"ов пишу:
If DBEdit1<>"" AND DBEdit2<>"" AND DBEdit3<>"" then begin ... end; end;
Delphi ругается!
Помогите найти ошибку!

← →
BIG_BROTHER (2003-09-02 21:03) [1]

Причем если стереть все AND т.е. оставить так
If DBEdit1<>"" then begin ... end; end;
То проверка одного Edita работает но мне надо проверить все!

← →
Ерш твое имя (2003-09-02 21:03) [2]

If (DBEdit1<>"") AND (DBEdit2<>"") AND (DBEdit3<>"")...

Нажми F1 и читай "Operator precedence rules". Они рулез.

← →
Моджахед (2003-09-02 21:03) [3]

If (DBEdit1<>"") AND (DBEdit2<>"") AND (DBEdit3<>"")

← →
BIG_BROTHER (2003-09-02 21:08) [4]

Спасибо:)

← →
Udjin (2003-09-02 21:54) [5]

Имхо так лучше

var
loop : Integer;
begin
for loop := 0 to ComponentCount - 1 do
if (Components[loop] is TEdit) then
if (Components[loop] as TEdit).Text =""then {ваш код}

Проверка заполнения Найти похожие ветки