ShIvADeSt Moderator Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору Продолжение темы http://forum.ru-board.com/topic.cgi?forum=33&topic=3647&start=2020#lt Внимание, все большие куски кода (более 5 строк) оформляем в тег [more] дабы уменьшить размер поста. Всего записей: 3956 | Зарегистр. 29-07-2003 | Отправлено: 01:52 20-04-2006 | Исправлено: ShIvADeSt, 02:02 30-06-2006

Erazer Advanced Member Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору Цитата: А с флагами ты немножно недобрал  вот поставь такие и все будет ОК может и недбрал, но все равно даже с твоими флагами - "Ошибка при удалении файла или папки", "Не удается удалить файл. Не удается произвести чтение из файла или с диска. " Всего записей: 1729 | Зарегистр. 02-08-2003 | Отправлено: 15:55 06-10-2006

Jokerjar BANNED Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору У кого-нибудь есть пример отправки e-mail без помощи сторонних почтовых программ и без использования компонентов (indy и прочих)? Поделитесь! Всего записей: 591 | Зарегистр. 22-03-2006 | Отправлено: 16:13 06-10-2006

Erazer Advanced Member Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору Мдя....  сам столкнулся сам решил сам опубликовал решение Проблема решается архипросто "d := DestPath+'\*.*'; DeleteFiles(Handle,trim(d), True);" Кааим-то макаром в d появляются лишние пробелы которые при работе с путями без пробелов не всплывают,мы их просто удаляем trim(d) и все работает как нуно Спасибо всем принявшим участие в решении Всего записей: 1729 | Зарегистр. 02-08-2003 | Отправлено: 17:19 06-10-2006

Jokerjar BANNED Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору Sexton, спасибо. Я начитался доков и сам написал модуль для KOL. Умеет отправлять html письма и прикреплять файлы. Несжатый екзешник получается где-то 35 кб. Всего записей: 591 | Зарегистр. 22-03-2006 | Отправлено: 06:43 08-10-2006

Jokerjar BANNED Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору Цитата: ручкам на WinAPI Так и сделал   Теперь такой вопрос: как можно назначить событие на подключение к интернету, то есть выполнить определенную процедуру в тот момент, когда компьютер удачно вышел в инет. Желательно без циклов и на Win API Всего записей: 591 | Зарегистр. 22-03-2006 | Отправлено: 10:57 08-10-2006

Arvur Silver Member Редактировать | Профиль | Сообщение | ICQ | Цитировать | Сообщить модератору Jokerjar Цитата: Я начитался доков и сам написал модуль для KOL. Умеет отправлять html письма и прикреплять файлы. Поделишься с общественностью? Всего записей: 2111 | Зарегистр. 18-01-2002 | Отправлено: 13:33 08-10-2006

Jokerjar BANNED Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору Arvur, хватай! SMTP   Разрешаю даже подкорректировать если надо . Используй примерно так:   procedure SendMail(P: Pointer); var let: TLetter; begin let.NeedAuth := false; let.mHost := 'smtp.yandex.ru'; let.mFrom := 'me@yandex.ru'; let.mTo := 'you@yandex.ru'; let.mFromName := 'me'; let.mToName := 'you'; let.Subject := 'Тема';   OpenMIME(let.mBody); AddHTMLBlockToBody(let.mBody,'<b><div style="color:red">Привет. Не ждал?</div></b>'); AttachFileToBody(let.mBody,'test.rar'); CloseMIME(let.mBody);   SMTPConnectAndSendMail(let,form1.memo1); end;   Всего записей: 591 | Зарегистр. 22-03-2006 | Отправлено: 14:37 08-10-2006 | Исправлено: Jokerjar, 14:55 08-10-2006

DroN_S Advanced Member Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору Jokerjar вот если бы ты ещё теги code and /code использовал, было бы вообще просто супер Всего записей: 1143 | Зарегистр. 09-04-2005 | Отправлено: 14:55 08-10-2006 | Исправлено: DroN_S, 14:56 08-10-2006

Jokerjar BANNED Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору DroN_S, а я уже исправил     Добавлено: Кстати, то что ты говорил по поводу GetInternetConnection InetIsOffline. Это же функции, проверяющие на "онлайность". То-есть чтобы зафиксировать выход в инет, нужно периодически проверять их значение. А не существует чего то типа хука? А то не хочется по несколько часов цикл в проге гонять. Всего записей: 591 | Зарегистр. 22-03-2006 | Отправлено: 15:12 08-10-2006

Jokerjar BANNED Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору Без KOL можно. Но тогда надо sysutils, повлияет на размер. А чем KOL плох? Всего записей: 591 | Зарегистр. 22-03-2006 | Отправлено: 15:22 08-10-2006

Jokerjar BANNED Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору DroN_S, надо немного переделать. Чуть позже выложу Всего записей: 591 | Зарегистр. 22-03-2006 | Отправлено: 15:26 08-10-2006

Arvur Silver Member Редактировать | Профиль | Сообщение | ICQ | Цитировать | Сообщить модератору Jokerjar Thanx! Всего записей: 2111 | Зарегистр. 18-01-2002 | Отправлено: 15:30 08-10-2006

goodwen Member Редактировать | Профиль | Сообщение | ICQ | Цитировать | Сообщить модератору Привет всем. Как в делфи путь к файлу указывать если его месторасположение заранее не известно ? Файл будет лежать в папке WAVE но где сама пака будет я не знаю. Вызывая функцию  PlaySound  как мне указать место расположение ?   По памяти помню, что как -то так   PlaySound  ('...\\Wave\intro.wav',0,SYNC); но не работает Подскажите а лучше завидите на ссылку сам я в яндыксе не нашел ответа. Всего записей: 243 | Зарегистр. 09-04-2006 | Отправлено: 16:08 08-10-2006 | Исправлено: goodwen, 16:12 08-10-2006

Jokerjar BANNED Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору DroN_S, чет даже не знаю. имхо кол - идеальный вариант. Мой модуль выводит ответы сервера в kolmemo. Если ты не используешь KOL, а VCL, то нет смысла использовать мой модуль, выигрыша в размере все равно не будет. Если для консольной, то в uses просто меняешь KOL на sysutils, а в самом коде все Pcontrol на string. А может ответ сервера вообще не нужен? Цитата: я его вообще не использую.... Да и не нужно. Просто в uses добавил и все...   Всего записей: 591 | Зарегистр. 22-03-2006 | Отправлено: 16:14 08-10-2006 | Исправлено: Jokerjar, 16:15 08-10-2006

Страницы: 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

Компьютерный форум Ru.Board » Компьютеры » Прикладное программирование » Вопросы по Delphi 2

ShIvADeSt (22-03-2007 02:18): http://forum.ru-board.com/topic.cgi?forum=33&topic=8142

Переход по форумам  Закладки   » Компьютеры Цифровое изображение Программы Microsoft Windows UNIX Другие OS Hardware В помощь сисадмину Прикладное программирование Игры Форумные игры   » Интернет Web-программирование В помощь вебмастеру Графика Хостинг Зацените-ка!   » Тематические Ikonboard v.2 Ikonboard v.3 Invision Board Другие форумы PHP-Nuke и другие порталы Мобила   » Общие Спорт Флейм Темы по региональным встречам Музыка и Кино Юмор Литература и Живопись   » Ru.Board Новости Помощь по форуму   » Андеграунд eBookz Варезник Раздачи и акции Мобильный варезник Андеграунд Игры и фильмы   » Специальные Тестирование