TEdit

[green]

Глупый вопрос: как проверить пустоту поля TEdit ?

[SuperVisor]

if edit1.text='' then ...
или

for i:= 0 to length(Edit1.Text)-1 do 
 if Edit1.text[i] <> #32 then Break else 
  if i = length(Edit1.Text)-1 then 
  begin
  Showmessage('Type *Somthing* in the field!!!');
  Edit1.SetFocus;
  Exit;
end;

[Alar]

if edit1.text='' then ...

[BesTiYa]

Подскажите плизз...как вбить в Едит маску на ввод мыла. причем мыло может быть либо __@__.com или __@__.__.com. * не идет.

[Makarov]

Для этого можно использовать компонент TMaskEdit, расположенном на вкладке Additional!

[BesTiYa]

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

Для этого можно использовать компонент TMaskEdit, расположенном на вкладке Additional!

Я использовала этот компонент, там * - это один символ а мне нужно любое количество. L тоже не подходит.

[mihali4]

Скорее всего
if Trim(edit1.text)='' then ...

Я использовала этот компонент, там * - это один символ а мне нужно любое количество. L тоже не подходит.

А встроенным в Дельфи хэлпом вы пользоваться не умеете?
Научитесь, рекомендую - очень поможет избегать таких вопросов...

[andrey4623]

Вообще, в любой маске:
? - один символ
* - несколько символов

[pu4koff]

разве там вапще есть такой символ, как звездочка ? я что-то в хэлпе даже щас перепроверил, но ничего про звездочку нет. в компоненте помойму всегда фиксированное кол-во символов вводица, соответственно маске. разве что некоторые можно сделать необязательными

[BOBAH13]

Почему просто программно не делать так TEdit.Text := Format('your format', [your parametrs]);