Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2006.08.06;
Скачать: CL | DM;

Вниз

Замена сообщения об ошибке   Найти похожие ветки 

 
Sirus   (2006-07-14 17:44) [0]

Подскажите , знатоки, как заменить системное сообщение  на  свое.
Мне   при  вставке в   проиндексированную  таблицу  одинаковых  по  ключу  записей  выдает KEY VIOLATION,  а  хотелось бы  заменить более  понятным  сообщением  типа  ЗАПИСЬ С ТАКИМ КЛЮЧЕМ ИМЕЕТСЯ.
 Вот только не знаю как это сделать.  Буду благодарен  за  внимание  и  помощь.
14.07ю2006   Сайрус.


 
Desdechado ©   (2006-07-14 18:11) [1]

что-то так
try...
     except
       on E: EDBEngineError do
         begin
           WriteLn( F2, "__Нас. пункт "" + Trim( tblSrc.Fields[ iFieldPlaceName ].AsString ) + """ );
           for i := 0 to E.ErrorCount - 1 do
             WriteLn( F2, "  " + StringReplace( E.Errors[ i ].Message, #10, " ", [rfReplaceAll] ) );


 
sniknik ©   (2006-07-14 18:35) [2]

> Вот только не знаю как это сделать.
не знаеш и слава богу! все ошибки все одно не переведеш, а получать вместо всего множества возможных исключений одно, но переведенное, радости мало. поверь человеку, которого, недели не проходит, как цто терроризирует по этому поводу "скажи от чего ошибка" (типа как самый умный)... а откуда узнаеш если они все переведены подобным образом, и исходников нет.
поубывал бы гадов...
последний "шедевр" был "Проблемы при старте сервиса, сервис не запущен." (типа этого) это при старте программы которая и не сервис вовсе... причем выдает и при  отсутствии ini файла, и при занятом кем нибудь порте, и при невозможности подключится к базе (сервер для теста "притушили"). в общем на ВСЕ при старте. а видать тоже думал "улучшить", столкнулся, и перевел, что то одно, а перехватывает все ексепты. не подумал типа. (а если подумал но всетаки так сделал то еще хуже, это уже диверсия... в одном случае гнать с работы за ламеризм в другом за вредительство... имхо)

p.s. как показывает практика юзеры. те кому "понятные" ошибки предназначаются все одно их не читают, а тот кто читает т.е. понимает зачем они справится и с английским текстом. не имхо, факт.



Страницы: 1 вся ветка

Текущий архив: 2006.08.06;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.036 c
15-1152184451
Gero
2006-07-06 15:14
2006.08.06
Работал ли кто с Active Accessibility?


2-1153328997
learner
2006-07-19 21:09
2006.08.06
NamedPipe информация о подсоединившемся клиенте.


15-1152294495
palva
2006-07-07 21:48
2006.08.06
Сильвио Берлускони предстанет перед судом


2-1152618743
logslava
2006-07-11 15:52
2006.08.06
Как одной строкой заполнить TStringList


10-1122560284
GekaNaz
2005-07-28 18:18
2006.08.06
НЕ могу вставить в Excel таблицу гиперссылку из Delphi