Yvision.kz
kk
Разное
Разное
399 773 постов41 подписчиков
Всяко-разно
0
13:10, 02 марта 2010

Псевдо-отладочный режим...

Небольшой хак... возможно пригодится кому...

В общем, в который раз уже за последние годы, отлаживал сегодня форму отчета в очередной программе. Завтра ехать к заказчику, показывать, и пришла мысль, а как бы сделать так, чтобы на компьютере заказчика можно было программу "вгонять" в режим отладки, например, не выводить форму на печать, а переходить в режим просмотра, без дополнительной кнопки и вообще, переключать некоторые функции программы в "девелоперский" режим? Родился вот такой хак:

.......

if FileExists(ExtractFilePath(Application.ExeName)+'admin.txt') then
RepForm.RasOrder.Preview else RepForm.RasOrder.Print;

.....

if FileExists(ExtractFilePath(Application.ExeName)+'admin.txt') then SecretButton.Visible:=true;

Т.е. приходим к заказчику, запускаем прогу, он ее тестирует. Если возникли какие-то баги, то создаем в каталоге программы файл с именем admin.txt и перезапускаем ее. И в первом случае уже можно посмотреть отчет в превью, без печати и траты бумаги, а во-втором случае у нас появляется "волшебная" кнопка, на которую можно повесить например вывод значений каких-то переменных и уже сразу понять что и где пошло не так.

Вот, может быть сумбурно описал, но идея, кажется, понятная.

Ничего сложного кстати, по реализации, просто идея. Надеюсь, пригодится кому...

0