• Познакомьтесь с пентестом веб-приложений на практике в нашем новом бесплатном курсе

    «Анализ защищенности веб-приложений»

    🔥 Записаться бесплатно!

  • CTF с учебными материалами Codeby Games

    Обучение кибербезопасности в игровой форме. Более 200 заданий по Active Directory, OSINT, PWN, Веб, Стеганографии, Реверс-инжинирингу, Форензике и Криптографии. Школа CTF с бесплатными курсами по всем категориям.

Обработка данных

  • Автор темы dima_lamo
  • Дата начала
D

dima_lamo

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

morpheus

Код:
Edit1.MaxLength := 10
Можно выставитить на самом компоненте, свойство MaxLength
 
D

dima_lamo

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

morpheus

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

dima_lamo

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

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

root

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

dima_lamo

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

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


Что делать?
 
D

dima_lamo

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

dima_lamo

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 ???
В чём ошибка?
 
D

dima_lamo

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

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

dima_lamo

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

Pasha

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

dima_lamo

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

morpheus

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

dima_lamo

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


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

Pasha

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

GRLEX

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

dima_lamo

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

Обучение наступательной кибербезопасности в игровой форме. Начать игру!