Перейти из форума на сайт.

НовостиФайловые архивы
ПоискАктивные темыТоп лист
ПравилаКто в on-line?
Вход Забыли пароль? Первый раз на этом сайте? Регистрация
Компьютерный форум Ru.Board » Компьютеры » Прикладное программирование » Вопросы по Delphi (все версии) - часть 3

Модерирует : ShIvADeSt

ShIvADeSt (07-04-2008 02:27): продолжение в http://forum.ru-board.com/topic.cgi?forum=33&topic=9383  Версия для печати • ПодписатьсяДобавить в закладки
Страницы: 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74 75 76 77 78 79 80 81 82 83 84 85 86 87 88 89 90 91 92 93 94 95 96 97 98 99 100 101

   

SpoinT



Advanced Member
Редактировать | Профиль | Сообщение | ICQ | Цитировать | Сообщить модератору
s := Copy(url,pos('<tag>',url)+5,pos('</tag>',url)-pos('<tag>',url)-5);

----------
В жизни мне не хватает 2-х вещей - кнопок Save Game и Load Game...

Всего записей: 840 | Зарегистр. 31-01-2007 | Отправлено: 15:59 09-08-2007 | Исправлено: SpoinT, 15:59 09-08-2007
kalkin

Junior Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
программа вываливается с ошибкой ..

Всего записей: 56 | Зарегистр. 19-05-2006 | Отправлено: 16:07 09-08-2007
SpoinT



Advanced Member
Редактировать | Профиль | Сообщение | ICQ | Цитировать | Сообщить модератору
kalkin
с какой?

----------
В жизни мне не хватает 2-х вещей - кнопок Save Game и Load Game...

Всего записей: 840 | Зарегистр. 31-01-2007 | Отправлено: 16:31 09-08-2007
kalkin

Junior Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
ошибку нашел у себя =)
работает тока вот как его циклично поставит ну чтоб он все <tag></tag> в мемо перебрал и выкинул их значения ведь их
с урла может придти 40 -50 а то и 200 или еще больше
 

Всего записей: 56 | Зарегистр. 19-05-2006 | Отправлено: 16:52 09-08-2007
RostY



Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
1. найти pos(<tag>), pos (</tag>)
2. сделать copy текста от первой позиции до второй.
3. удалить все от начала до pos (</tag>) вместе с </tag>
и так повторять пока есть <tag>

Всего записей: 387 | Зарегистр. 11-01-2006 | Отправлено: 17:34 09-08-2007
SpoinT



Advanced Member
Редактировать | Профиль | Сообщение | ICQ | Цитировать | Сообщить модератору
PosEx юзай
 
Добавлено:
Function Pos(Substr: String; S: String): Integer;
Function PosEx(Const SubStr, S: String; Offset: Cardinal = 1): Integer;

----------
В жизни мне не хватает 2-х вещей - кнопок Save Game и Load Game...

Всего записей: 840 | Зарегистр. 31-01-2007 | Отправлено: 17:36 09-08-2007
ac86



Junior Member
Редактировать | Профиль | Сообщение | ICQ | Цитировать | Сообщить модератору
Вопрос по sql 2000:
Помогите, пожалуйста!
Как можно из колонки получить строку?
Напримир есть табличка:
id
A
B
C
D
E
F
G
H
..
AG
GE
...
 
Мне из этого нужно получить, строку: 'ABCDEFGH..AGGE...'.
Знаю, что в 2005 появилась функция pivot, а в 2000?

Всего записей: 170 | Зарегистр. 26-11-2006 | Отправлено: 19:08 09-08-2007
RomanTim

Member
Редактировать | Профиль | Сообщение | ICQ | Цитировать | Сообщить модератору
kalkin
Я бы посоветовал посмотреть в сторону регулярных выражений - все таки они специально заточены под парсинг текстов, готовые библиотеки есть и платные и бесплатные.
 
ac86
А при чем тут делфи??? Есть же ветка http://forum.ru-board.com/topic.cgi?forum=33&topic=1805#1 [?]
 

Pivot тебе вернет не строку, а запись с кучей полей. Можно сделать так:
declare @s varchar
select @s=@s + id from table
select @s

Всего записей: 375 | Зарегистр. 11-09-2003 | Отправлено: 19:53 09-08-2007
kalkin

Junior Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
нашел довольно интересный компонент TRegExpr вот пробую спасибо за советы

Всего записей: 56 | Зарегистр. 19-05-2006 | Отправлено: 21:41 09-08-2007
gtrocpr

Junior Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
Был бы рад если подсказали бы
Ситуация:
Есть процедура Oracle - procedure GetData(abc in out refc); где refc - REF CURSOR
 
Вопрос как передать одно из полей курсора (тк IN ) для ее выполнения. Компоненты доступа ODAC или ADO все в Delphi

Всего записей: 75 | Зарегистр. 17-12-2005 | Отправлено: 17:31 10-08-2007
xy



ХУдератор
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
Подскажите пожалуйста пример какой-нить для приложения типа апдейтера (как у антивира, например)..
что-нибудь где можно указать список файлов для обновления и поддерживалась система зависимостей, работать должно либо просто с фтп, либо (желательно) с пхп-скриптами
 
думаю никакие доп. компоненты тут не требуются, просто хочу взглянуть готовый пример, чтоб не изобретать велосипед :)

----------
Счастливые мысли приводят к счастливой клеточной биохимии

Всего записей: 10530 | Зарегистр. 28-05-2003 | Отправлено: 12:02 12-08-2007
Dennica



Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
xy
Можно посмотреть компонент WebUpdate от TMS. Он есть в исходниках delphi. Плюсом можно считать возможность создавать и обновлять приложение патчами, исходники. Минусом довольно неудобно настраивать конфиг. Есть вроде штатная утилита для этого дела, но когда я с ним возился в итоге написал нужный конфиг в ручную.
 
Есть еще AutoUpdatePlus. Но это отдельная тулза. Из плюсов, очень удобно настраивать конфиги, управлять сервером обновлений, на клиенте при установке можно установить менеджер прав и и легко производить обновление для непревилигированных пользователей. Ну минус один.. раз отдельная тулза то нужно распространять вместе с приложением клиент обновления и для того чтоб поставить менеджер прав по большому счету нужно делать инсталяторы для клиента.
 
Это из того что я пробовал.
 
 
Добавлено:
з.ы. обе системы могут работать и по http и по ftp и просто по сети

Всего записей: 235 | Зарегистр. 19-12-2005 | Отправлено: 08:11 13-08-2007
SergeBS



Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
RostY
SpoinT
Что-то вы мудрите. ЕСть такая штука: AnsiReplaceStr, а у Memo - свойство Text. 2 вызова - и все белое и пушистое

Всего записей: 272 | Зарегистр. 19-04-2005 | Отправлено: 10:56 13-08-2007
RomanTim

Member
Редактировать | Профиль | Сообщение | ICQ | Цитировать | Сообщить модератору
SergeBS
А ты почитай исходный пост от kalkin - ему нужны все текстовки межу <tag> и </tag>, каким боком тут замена подстроки поможет?

Всего записей: 375 | Зарегистр. 11-09-2003 | Отправлено: 12:08 13-08-2007
xy



ХУдератор
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
Dennica
понял, посмотрю :)
 
а есть какие-нибудь примеры шедулеров :-?
ну чтоб садилось в сервисы, и/или (лучше, т.к. под вин98 иногда работает) в трей и шедулилось тихонько :-?

----------
Счастливые мысли приводят к счастливой клеточной биохимии

Всего записей: 10530 | Зарегистр. 28-05-2003 | Отправлено: 12:15 13-08-2007
SergeBS



Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
RomanTim
Нда. Поспешил. Тут замена не поможет

Всего записей: 272 | Зарегистр. 19-04-2005 | Отправлено: 16:03 13-08-2007
skinash



Junior Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
Sorry, если не в тему или боян.
Нашёл в Delphi2006 пасхальное яйцо. В окне Help\About при нажатой кнопке Alt надо набрать слово TEAM. Появится надпись "Borland Rules!" Чуть ниже кнопка "OK, I understand." В нижнем левом углу кнопка "Team", в правом слово "GUNGLA". Если кликнуть на "GUNGLA", то в центре появится картинка "обезьяна-серфер". А если кликнуть на "Team", то вашему вниманию будет представлена игра, типа арканоид - сверху падают фамилии разработчиков, надо управлять компьютером внизу (стрелками) и пробелом стрелять по этим фамилиям, и набирать очки.

Всего записей: 145 | Зарегистр. 21-09-2006 | Отправлено: 08:58 14-08-2007
xy



ХУдератор
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
skinash
неужто сам нашел :):):)
"сижу, team по альтом подбираю" :)

----------
Счастливые мысли приводят к счастливой клеточной биохимии

Всего записей: 10530 | Зарегистр. 28-05-2003 | Отправлено: 09:05 14-08-2007
delover

Advanced Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
skinash
Сколько набрал? А по результатам нет розыгрыша победителей в интернете с призами типа пасхальных яиц? Первый раз я набрал тысячу, но думаю можно и больше.

Всего записей: 1395 | Зарегистр. 25-06-2007 | Отправлено: 10:32 14-08-2007
skinash



Junior Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
xy
Ага, остальные слова не подошли
 
delover
170, Я не фанат арканоида, уж лучше пинбол

Всего записей: 145 | Зарегистр. 21-09-2006 | Отправлено: 11:03 14-08-2007
   

Страницы: 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74 75 76 77 78 79 80 81 82 83 84 85 86 87 88 89 90 91 92 93 94 95 96 97 98 99 100 101

Компьютерный форум Ru.Board » Компьютеры » Прикладное программирование » Вопросы по Delphi (все версии) - часть 3
ShIvADeSt (07-04-2008 02:27): продолжение в http://forum.ru-board.com/topic.cgi?forum=33&topic=9383


Реклама на форуме Ru.Board.

Powered by Ikonboard "v2.1.7b" © 2000 Ikonboard.com
Modified by Ru.B0ard
© Ru.B0ard 2000-2025

BitCoin: 1NGG1chHtUvrtEqjeerQCKDMUi6S6CG4iC

Рейтинг.ru