Вопрос № 21950: Подскажите пожалуйста где можно найти на русском языке статьи как пользоваться TPCClient, TCPServer компонентами....Вопрос № 21952: Работаю с SQL Server через ADO.
При добавлении новой записи надо перехватить и обработать исключение, если такая запись уже существует.
Поставил try и except, но вывод ошибки получается раньше, нежели срабатывает перехват. Объясните, что я де...Вопрос № 21970: сБЮФЮЕЛШЕ ЩЙЯОЕПРШ! б Delphi 6 ХЯОНКЭГСЕРЯЪ РЮАКХЖЮ Paradox, МЮБХЦЮЖХЪ
ОН ЙНРНПНИ ОПНХЯУНДХР ВЕПЕГ navigatorbar. оПХ СДЮКЕМХХ ГЮОХЯХ БШДЮЕРЯЪ
ГЮОПНЯ "Delete record" (Paradoxa). йЮЙ ЕЦН ОЕПЕУБЮРХРЭ Х ГЮЛЕМХРЭ ЯБНХЛ.
гЮПЮМЕЕ А...Вопрос № 21977: Здравствуйте!
Рисую jpeg на форме через: Form1.Canvas.Draw...
Размеры формы, допустим 800х600. Загружаемые jpeg разного
размера и всегда больше размера формы. Масштабировать не надо.
Внимание, вопрос! :-))
Как "зацепить&qu...
Вопрос № 21.950
Подскажите пожалуйста где можно найти на русском языке статьи как пользоваться TPCClient, TCPServer компонентами.
Отправлен: 08.06.2005, 23:42
Вопрос задал: Pithon (статус: Посетитель)
Всего ответов отправлено: 3
Отвечает: Bochvarov NikB
Здравствуйте, Pithon!
Ето основа TCP/IP, не сокетов: http://www.alcpress.com/rfc/tcpip/rfc1180.htm
А здесь очен хорошие статии с примеров:
Посьилаю имена статии Карих Николай, к сожалению, мои сьилки не сработали. Если хочеш - пошли мейл на nikb@mail.bg - будут у тебе статии и примерьи.
А можно спросит и у автора :)
Программирование серверов на основе сокетов в Дельфи
Программирование сокетов в Дельфи
Если у Вас есть какие-либо вопросы или пожелания - пишите по E-mail: snick@mailru.com, я всегда буду рад услышать любые отзывы!
P.S. Все приведенные здесь примеры можно скачать полностью, нажав здесь.
Карих Николай. Московская область, г.Жуковский
Ответ отправил: Bochvarov NikB (статус: 3-ий класс)
Отправлен: 09.06.2005, 00:05
Отвечает: sir henry
Здравствуйте, Pithon!
На русском - наверное нигде. Я, по крайней мере, не смог найти. :)
Ответ отправил: sir henry (статус: Профессор)
Отправлен: 09.06.2005, 05:34
Отвечает: Jadd
Здравствуйте, Pithon!
Можно попробовать на русскоязычном сайте борланда поискать, на его форумах. А что там не ясно? Там все должно быть предельно ясно и понятно. Есть хелп, в котором должны быть примеры.
--------- Hakuna matata
Ответ отправил: Jadd (статус: 9-ый класс)
Отправлен: 09.06.2005, 10:07
Вопрос № 21.952
Работаю с SQL Server через ADO.
При добавлении новой записи надо перехватить и обработать исключение, если такая запись уже существует.
Поставил try и except, но вывод ошибки получается раньше, нежели срабатывает перехват. Объясните, что я делаю не так.
Спасибо.
Приложение:
Отправлен: 09.06.2005, 00:37
Вопрос задал: AlexBEz (статус: Посетитель)
Всего ответов отправлено: 4
Отвечает: sir henry
Здравствуйте, AlexBEz!
Пользуйтесь компонентом ADOCommand, т.к. ADOQuery ДОЛЖНО возвращать набор данных, а у Вашем случае это в принципе невозможно. Почитайте описание, там это черным по белому написано. :)
Ответ отправил: sir henry (статус: Профессор)
Отправлен: 09.06.2005, 05:39
Отвечает: komatoz
Здравствуйте, AlexBEz!
Измени алгоритм..
Думаю не нужно использовать try вообще..
Сначала сделай выборку по тому значению.
Потом, если количество найденных строк adoquery.recordcount>0, то значит запись существует, и делай то что нужно, иначе то-то..
Ответ отправил: komatoz (статус: 2-ой класс)
Отправлен: 09.06.2005, 08:36
Отвечает: Jadd
Здравствуйте, AlexBEz!
У класса TADOQuery есть событие OnPostError. Его и нужно перехватывать. Блоки try ничем не помогут. Здесь класс делает PostMessage, а не throw Exception. Стало быть и хватать нужно обработчиком сообщений винды, а не перехватывать исключительные ситуации, коими данные сообщения не являются.
--------- Hakuna matata
Ответ отправил: Jadd (статус: 9-ый класс)
Отправлен: 09.06.2005, 10:33
Отвечает: streetcat
Здравствуйте, AlexBEz!
а какое исключение надо ловить? Если любое, то исправьте свой код на код в приложении. Если это не поможет, то наверное, исключение генерируется вне блока try..except.
Приложение:
--------- WinERROR: Keyboard not detected. Press Enter to continue
Ответ отправил: streetcat (статус: 6-ой класс)
Отправлен: 09.06.2005, 13:43
Вопрос № 21.970
сБЮФЮЕЛШЕ ЩЙЯОЕПРШ! б Delphi 6 ХЯОНКЭГСЕРЯЪ РЮАКХЖЮ Paradox, МЮБХЦЮЖХЪ
ОН ЙНРНПНИ ОПНХЯУНДХР ВЕПЕГ navigatorbar. оПХ СДЮКЕМХХ ГЮОХЯХ БШДЮЕРЯЪ
ГЮОПНЯ "Delete record" (Paradoxa). йЮЙ ЕЦН ОЕПЕУБЮРХРЭ Х ГЮЛЕМХРЭ ЯБНХЛ.
гЮПЮМЕЕ АКЮЦНДЮПЕМ.
Отправлен: 09.06.2005, 12:50
Вопрос задал: Николай Александрович (статус: Посетитель)
Всего ответов отправлено: 2
Отвечает: Rusland
Здравствуйте, Николай Александрович!
Возможно дело не в навигаторе. Если вы используете DBGrid в свойствах которого Options | dgConfirmDelete выставлен True, то перед удалением будет как раз выдаватся "Delete record".
Удачи.
Ответ отправил: Rusland (статус: 4-ый класс)
Отправлен: 09.06.2005, 13:02
Отвечает: sir henry
Здравствуйте, Николай Александрович!
Переписать исходники Навигатора. :)
Сам Парадокс никогда ничего подобного не спрашивает.
Ответ отправил: sir henry (статус: Профессор)
Отправлен: 09.06.2005, 13:12
Вопрос № 21.977
Здравствуйте!
Рисую jpeg на форме через: Form1.Canvas.Draw...
Размеры формы, допустим 800х600. Загружаемые jpeg разного
размера и всегда больше размера формы. Масштабировать не надо.
Внимание, вопрос! :-))
Как "зацепить" левым кликом мыши рисунок и перетянуть/протянуть его (вверх/вниз/диагональ) для отображения невидимой в данный момент (за пределами формы) части.
Благодарствую заранее, Иван!
Отправлен: 09.06.2005, 16:35
Вопрос задал: _ (статус: Посетитель)
Всего ответов отправлено: 3
Отвечает: Jadd
Здравствуйте, _!
Тут был подобный вопрос. На событие OnMouseMove выичсляешь новое положение относительно текущего. За основу берешь X и Y, которые попадают в процедуру. Определяешь находится ли курсок м ректе картинки (PtInRect). Определяешь нажата ли кнопка (это тоже поподает в процедуру). А дальше перерисовываешь свой jpeg в новой позиции. Все. Это не только с картинками, но и с любым контролом можно делать.
--------- Hakuna matata
Ответ отправил: Jadd (статус: 9-ый класс)
Отправлен: 09.06.2005, 17:07 Оценка за ответ: 4 Комментарий оценки: Понял! Точно! Решил действовать пока попроще. А потом так и сделаю. Спасибо. Особенно за оперативность!!! \__/
Отвечает: Ерёмин Андрей
Здравствуйте, _!
Думаю, здесь будет лучше сделать так: поместить на форму TScrollBox (Additional), на него TImage. У TImage поставить AutoSize=True. Затем не рисовать на канве, а загружать изображение в TImage, которое само заставит ScrollBox научиться показывать остальные "невидимые" части.
Ответ отправил: Ерёмин Андрей (статус: 6-ой класс)
Отправлен: 09.06.2005, 18:43 Оценка за ответ: 5 Комментарий оценки: Все гениальное - просто! Спасибо.
Отвечает: sir henry
Здравствуйте, _!
Дык если Вы рисуете прямо на форме, то сделайте полосы прокрутки. У формы они есть.
Ответ отправил: sir henry (статус: Профессор)
Отправлен: 10.06.2005, 04:22 Оценка за ответ: 2 Комментарий оценки: Изображение стирается :-(((