Size: a a a

2020 March 04

N

Nik in Delphi & Lazarus
Хочется полезное сообщение написать - напиши на форуме. Толку больше будет.
источник

АП

Андрей Подопригора in Delphi & Lazarus
Nik
Хочется полезное сообщение написать - напиши на форуме. Толку больше будет.
Я не нуждаюсь в Ваших советах. ;)
источник

AF

Andrew Fa in Delphi & Lazarus
Nik
А у меня впечатления, что ты любишь заходить на форумы и отвечать на вопросы из 2002 года 😉
(я кстати именно такими ответами пользуюсь!!!!😁)
источник

AF

Andrew Fa in Delphi & Lazarus
к слову сказать у меня получилось вчера реализовать таки регистрацию нормально с проверкой существующего юзера в БД. Так что все очень помогли)
источник

МС

Максим Сысоев in Delphi & Lazarus
Andrew Fa
к слову сказать у меня получилось вчера реализовать таки регистрацию нормально с проверкой существующего юзера в БД. Так что все очень помогли)
Как мало нужно человеку для счастья
источник

AF

Andrew Fa in Delphi & Lazarus
Максим Сысоев
Как мало нужно человеку для счастья
эт только начало) но да, для счастья много не надо, учитывая катастрофическую простоту задуманного)
источник

VI

Vitalii Ishkevych in Delphi & Lazarus
s:= edt1.Text;
 l1:= Length(s);
 ii:=1;
 for i:=1 to l1 do
   if ',' in M then
     begin
       Inc(ii);
     end;
     if '.' in M then
       begin
         Exclude(M, '.');
         Break;
       end
     else
       Include(M[ii], edt1.Text[i]);
источник

VI

Vitalii Ishkevych in Delphi & Lazarus
А че так нельзя?
источник

VI

Vitalii Ishkevych in Delphi & Lazarus
Ругается на M[ii]. M это у меня множества (set of Char)
источник

GB

George Bakhtadze in Delphi & Lazarus
Vitalii Ishkevych
Ругается на M[ii]. M это у меня множества (set of Char)
просто M, как при exclude
источник

GB

George Bakhtadze in Delphi & Lazarus
Vitalii Ishkevych
s:= edt1.Text;
 l1:= Length(s);
 ii:=1;
 for i:=1 to l1 do
   if ',' in M then
     begin
       Inc(ii);
     end;
     if '.' in M then
       begin
         Exclude(M, '.');
         Break;
       end
     else
       Include(M[ii], edt1.Text[i]);
а ты вообще как с массивом работаешь
источник

VI

Vitalii Ishkevych in Delphi & Lazarus
Мне нужно так сделать: Когда находит , то начать записывать посимвольно в следующее множество
источник

VI

Vitalii Ishkevych in Delphi & Lazarus
George Bakhtadze
а ты вообще как с массивом работаешь
множество а не масив
источник

GB

George Bakhtadze in Delphi & Lazarus
Vitalii Ishkevych
Мне нужно так сделать: Когда находит , то начать записывать посимвольно в следующее множество
элементы в множестве не упорядочены. т.е. не имеет значения когда добавлять. и не имеет смысла куда во множество добавлять. элемент там либо есть, либо нет.
источник

DB

Dmitry Belkevich in Delphi & Lazarus
вот никак человек не может от массивов отвыкнуть )
источник

VI

Vitalii Ishkevych in Delphi & Lazarus
George Bakhtadze
элементы в множестве не упорядочены. т.е. не имеет значения когда добавлять. и не имеет смысла куда во множество добавлять. элемент там либо есть, либо нет.
Я это знаю. У меня в задании нужно ввести в едит1 слова через , и добавить буквы каждного слова в новое множество.

Например:
В едит1 было введено: car, var, magazine, shop.

Програма должна записать в M1 'c' 'a' 'r' потом она нашла , и должна начать записывать слово var в M2 и т.д
источник

DB

Dmitry Belkevich in Delphi & Lazarus
надо учится принципам декомпозиции задачи. очень помогает
источник

DB

Dmitry Belkevich in Delphi & Lazarus
например: разбиваем содержимое по словам. создаем массив множеств по размеру = количеству слов
источник

DB

Dmitry Belkevich in Delphi & Lazarus
далее в цикле пробегаемся по словам, еще в одном цикле пробегаемся по каждому слову и заполняем множества
источник

DB

Dmitry Belkevich in Delphi & Lazarus
можно конечно делать и 'по ходу'
источник