Hola,
Siguiendo lo que dice Román, en lugar de esto:
Código Delphi
[-]
if (Frame18.Edit1.Text <> '') or (Frame18.Edit2.Text <> '') or (Frame18.Edit3.Text <> '') then
begin
end;
... el "Frame" podría incorporar algún método que nos echara una mano, como "IsEmptyEdits()", que nos podría servir para mejorar la legibilidad del código, en cuanto a que sería este método quien se encargarse de comprobar si los distintos "edits" están "vacíos" o qué.