Как сделать так, чтоб в компонет Edit1 можно было ввести максимум 10 символо?

Edit1.MaxLength := 10

Можно выставитить на самом компоненте, свойство MaxLength

а как сделать чтоб можно было только определённые символы вводить?

Для: dima_lamo
2 варианта либо использвоать MaskEdit либо писать обработчик нажатия клавиш на этом компоненте

Для: dima_lamo
Недавно ]]>обсуждали]]>, без определенного гемора - никак, проще проверять в момент "вычитывания".

А проверку на пустую строку как организовать?

Как сделать чтоб в компоненте Edit1 удалились последнии 2 символа, и то что останется чтоб записалось в компонент Edit2

Для: dima_lamo
1. if length(edit1.text)=0 then bla bla bla
2. Edit2.Text := leftStr(Edit1.Text ,length(Edit1.text)-2);

Edit2.Text := leftStr(Edit1.Text ,length(Edit1.text)-2);

[Error] Unit9.pas(556): Undeclared identifier: 'leftStr'


Что делать?

Как удалить весь текст из Edit2 ?

FileName := 'C:\prov.txt';
f := TStringList.Create;
idHttp1.Port := 80;
f.Add ( idHTTP1.Get('http://invis-hack.org.ru/quest/games/rega/1/1/'+Edit4.text) );
f.SaveToFile(FileName);
f.Free;
AssignFile(ff, 'C:\prov.txt');
Reset(ff);
while(Eof(ff)=false)do
readln(ff,s);
Memo6.Lines.Add(s);
Closefile(ff);


Почему содержимое файла C:\prov.txt не записывается в Memo6 ???
В чём ошибка?

Для: dima_lamo
Дебагер знаком вам?

Впервый раз слышу...

Объяснишь чё за нафиг? Я использывал подобный код, было всё норм, а в этот раз чёт не работает

справка по F8 + F7 ...

Ты скажи, у меня там всё верно записанно?

Если предложение поспользоватся дебаггером отвергаешь? Твой код не работает потому что луна сегодня вошла в дом марса. А в прошлый раз она выходила из дома юпитера, ес-но любой код работал бы тогда. Но в дом марса она входит каждый день, а выходит из дома юпитера раз в 2342 дней.

Ахахаха, такой бред я ещё не слышал!

Для: Pasha
жестко

Для: Pasha
абсолютно прав, патаму что с точки зрения банальной эрудиции ...

с точки зрения банальной эрудиции, КАЖДЫЙ ИНДИВИДУУМ, КРИТИЧЕСКИ МОТИВИРУЮЩИЙ АБСТРАКЦИЮ, НЕ МОЖЕТ ИГНОРИРОВАТЬ КРИТЕРИИ УТОПИЧЕСКОГО СУБЪЕКТИЗМА, КОНЦЕПТУАЛЬНО ЭНТЕРПРИТИРУЯ ОБЩЕПРИНЯТЫЕ ДЕФФАНИЗИРУЮЩИЕ ПОЛЯРИЗАТОРЫ


ГыГы... ССори за Капс и фуд, и офф...

Для: dima_lamo
Не нравится мое объяснение глюков твоего когда - почитай про дебаггер. А пока выход луны из неправильного дома ничем не хуже твоих предположений о причинах глюков.

Так бы сразу и сказал!

Хы!

Для: dima_lamo
Раз уж начал работать с Memo, то зачем изобретать велосипед???
у мемо есть 2 прекрасных свойства для работы с текстовыми файлами
memo1.Lines.LoadFromFile(FileName); и
memo1.Lines.SaveToFile(FileName);

Ну эт я уже знаю! Но всё равно спс, лучше поздно, чем никогда!

Как я понимаю, тут:

while(Eof(ff)=false)do

Лучше все-таки поставить:

while (not  Eof (ff)) do

Ну и тело цикла хорошо бы в Begin ... End; занести, а то запишется только последняя строчка файла.

И вообще будет зашибись, если еще и try ... except добавить.

p.s. А с отладчиком все же следует поближе познакомиться - полезный дяденька

Хым, а может ты мне в аську стукнешь?
570-855