До пятницы держал специально...
Короче, помню что где-то 8-10 января приятель у которого работает моя
программа попросил кое-что дописать. Не суть важно что... Я пришел,
попытался чего-то сделать, но как-то совсем тяжко программировать было.
Посидев минут пятнадцать и написав пару строк я сказал что башка не варит
совсем, и пошли мы пить пиво... О проблеме как-то забыли совсем. И вот
позавчера вспомнили опять. Открыл я то, что тогда написал и поразился
глубине своих мыслей. Вот текст процедуры:
Procedure AAA;
var FlgExit : boolean;
begin
if (qrCars.state <> dsBrowse) then
FlgExit := True
else
FlgExit := False;
if (FlgExit) then Exit;
{ не забыть дописать процедуру ...}
end;
Да, вовремя я тогда остановился :)
With b/r. Gleb.
