HOME    FORUMS    MEMBERS    RECENT POSTS    LOG IN  
Баннер 1   Баннер 2

ANTICHAT — форум по информационной безопасности, OSINT и технологиям

ANTICHAT — русскоязычное сообщество по безопасности, OSINT и программированию. Форум ранее работал на доменах antichat.ru, antichat.com и antichat.club, и теперь снова доступен на новом адресе — forum.antichat.xyz.
Форум восстановлен и продолжает развитие: доступны архивные темы, добавляются новые обсуждения и материалы.
⚠️ Старые аккаунты восстановить невозможно — необходимо зарегистрироваться заново.
Вернуться   Форум АНТИЧАТ > ПРОГРАММИРОВАНИЕ > С/С++, C#, Rust, Swift, Go, Java, Perl, Ruby
Перезагрузить страницу [Delphi]/[Pascal] Задай вопрос, получи ответ
   
Ответ
Страница 475 из 677 « Первая < 375425465 471 472 473 474 475 476 477 478 479 485525575 > Последняя »
 
Опции темы Поиск в этой теме Опции просмотра

  #4741  
Старый 28.10.2009, 22:00
Nick_Rimer
Новичок
Регистрация: 12.05.2008
Сообщений: 19
Провел на форуме:
28051

Репутация: 2
По умолчанию
А вот теперь мы возвращаемся к тому, с чего я начал!!!
Нельзя организовать оператор case перебором по string.
Он ругается, что ему нужен ordinal type.
Char бы подошел.. но я в тупике, и не могу понять, что делать, думать что-то вместо case или преобразовывать string во что-то другое, "более числовое"

------------------------

Все, вопрос снят, проблема решена!

str: string; с: char; i: byte - переменная цикла for;
c:=str[i];
ABC(c);

все работает
Последний раз редактировалось Nick_Rimer; 28.10.2009 в 22:51..
 
Ответить с цитированием

  #4742  
Старый 29.10.2009, 18:11
[Abbath]
Познающий
Регистрация: 01.10.2009
Сообщений: 97
Провел на форуме:
979876

Репутация: 26
Отправить сообщение для [Abbath] с помощью ICQ
По умолчанию
Значит такой вопросик :
есть Тмемо в который водят в столбик цифры от 4 до 9 знаков
внизу есть еще 6 Тмемо
Нужно чтоб эти цифры(которые в столбик)
сортировались в те 6 Тмемо
по такому принцыпу:
в 1Тмемо цифры из 4х знаков
в 2Тмемо цифры из 5 и тд до 9
вродебы реализовал а почемуто несортирует он их(

прошу помочь с реализацией в Делфи7
 
Ответить с цитированием

  #4743  
Старый 29.10.2009, 18:23
slesh
Познавший АНТИЧАТ
Регистрация: 05.03.2007
Сообщений: 1,985
Провел на форуме:
3288241

Репутация: 3349


Отправить сообщение для slesh с помощью ICQ
По умолчанию
Код:
var
 x : integer;
begin
 for x := 0 to memo1.Lines.Count-1 do
 begin
  case length(memo1.Lines.Strings[x]) of
    4:memo2.lines.add(memo1.Lines.Strings[x]);
    5:memo3.lines.add(memo1.Lines.Strings[x]);
    6:memo4.lines.add(memo1.Lines.Strings[x]);
    7:memo5.lines.add(memo1.Lines.Strings[x]);
    8:memo6.lines.add(memo1.Lines.Strings[x]);
    9:memo7.lines.add(memo1.Lines.Strings[x]);
  end;
 end;
end;
 
Ответить с цитированием

  #4744  
Старый 29.10.2009, 18:29
[Abbath]
Познающий
Регистрация: 01.10.2009
Сообщений: 97
Провел на форуме:
979876

Репутация: 26
Отправить сообщение для [Abbath] с помощью ICQ
По умолчанию
а где критерии что если длина 4 символа то в 4мемо и тд?
 
Ответить с цитированием

  #4745  
Старый 29.10.2009, 18:34
slesh
Познавший АНТИЧАТ
Регистрация: 05.03.2007
Сообщений: 1,985
Провел на форуме:
3288241

Репутация: 3349


Отправить сообщение для slesh с помощью ICQ
По умолчанию
>>>>>>>> 4:memo2.lines.add(memo1.Lines.Strings[x]); <<<<<<<<<<<,
мемо1 - там данные.
мемо2 - для 4
мемо3- для 5 итд
 
Ответить с цитированием

  #4746  
Старый 29.10.2009, 18:37
[Abbath]
Познающий
Регистрация: 01.10.2009
Сообщений: 97
Провел на форуме:
979876

Репутация: 26
Отправить сообщение для [Abbath] с помощью ICQ
По умолчанию
блин спс огромное ща попробую=)
 
Ответить с цитированием

  #4747  
Старый 29.10.2009, 19:33
Adekvatnyj
Участник форума
Регистрация: 28.10.2009
Сообщений: 129
Провел на форуме:
460561

Репутация: 67
По умолчанию
Какая стратегия изучения Дельфи? Сначала выучить турбо паскаль 7.0 потом дельфи?
Или может сначала бейсик а потом дельфи, или бейсик - тпаскаль - дельфи?
 
Ответить с цитированием

  #4748  
Старый 29.10.2009, 19:46
intNet
Познающий
Регистрация: 31.05.2009
Сообщений: 68
Провел на форуме:
1271980

Репутация: 19
По умолчанию
Цитата:
Сначала выучить турбо паскаль 7.0 потом дельфи
Ага.
 
Ответить с цитированием

  #4749  
Старый 29.10.2009, 20:05
[Abbath]
Познающий
Регистрация: 01.10.2009
Сообщений: 97
Провел на форуме:
979876

Репутация: 26
Отправить сообщение для [Abbath] с помощью ICQ
По умолчанию
плин опять столкнулся с почти такого же рода проблемой нос разу задам пару вопросов чтоб не мучать несколько раз
1) есть строка из цифр затем знак ; и после него вместе с ним надо удолить все из строки
опять же во всех строках Тмемо
2)Есть Столбец цифр нужно расположить их в те же 6 мемо по кол-ву повторяемых цифр тоест
например 72377728738 вот тут повторение цифры 7 допустим 5 раз надо значит вывести в мемо5
66628266986666 тут больше 6к 9 штук в Мемо9 и вот так чтоб он с каждым номером в столбце начиная от повторения там 4х цифр так как длина числа максимум будет 9 символов
 
Ответить с цитированием

  #4750  
Старый 29.10.2009, 20:27
Adekvatnyj
Участник форума
Регистрация: 28.10.2009
Сообщений: 129
Провел на форуме:
460561

Репутация: 67
По умолчанию
А delphi в webe это совсем отдельная штука от простого дельфи?
 
Ответить с цитированием
Ответ
Страница 475 из 677 « Первая < 375425465 471 472 473 474 475 476 477 478 479 485525575 > Последняя »



« Предыдущая тема | Следующая тема »
Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
[Wi-Fi, BT] Задай вопрос - получи ответ! Alexsize Беспроводные технологии/Wi-Fi/Wardriving 2568 25.04.2026 12:58
[jQuery] - Задай вопрос, получи ответ Isis PHP 62 25.12.2009 03:25



Здесь присутствуют: 1 (пользователей: 0 , гостей: 1)
 


Быстрый переход




ANTICHAT.XYZ