|
|
Регистрация | << Правила форума >> | FAQ | Пользователи | Календарь | Поиск | Сообщения за сегодня | Все разделы прочитаны |
|
Опции темы | Поиск в этой теме | Опции просмотра |
#1
|
|||
|
|||
Сообщение об удалении, добавлении и изменении записи
http://zalil.ru/33871739 Код:
//вызов сообщения об удалении записи ChangesMsg('переменная1<BR>переменная2<BR>переменнаяN','','Удалить?'); //вызов сообщения о добавлении записи ChangesMsg('переменная1<BR>переменная2<BR>переменная3<BR>переменнаяN','',''); //вызов сообщения о изменении записи ChangesMsg('переменная1<BR>переменная2<BR>переменнаяN','переменная1<BR>переменная2<BR>переменная3<BR>переменнаяN',''); Если указан только первый параметр, второй не указан, то указав третий параметр он становится как Caption окна. Если указан только первый параметр - то это запрос на добавление Если указаны первые два параметра, а третий пустой - то это запрос на изменение Результат выполнения- Yes=True, No=false Пользуйтесь с удовольствием, кому пригодится, сегодня весь день убил на него ))) Последний раз редактировалось sorockinalex, 20.10.2012 в 02:13. |
#2
|
||||
|
||||
Цитата:
|
#3
|
|||
|
|||
ой, блин, извиняюсь забыл совсем
Последний раз редактировалось sorockinalex, 20.10.2012 в 01:10. |
#4
|
|||
|
|||
вот архив:
http://zalil.ru/33871630 |
#5
|
||||
|
||||
Цитата:
Вот содержимое этого архива: Цитата:
|
#6
|
|||
|
|||
блин, точно спать уж пора, башка как не варит уже
http://zalil.ru/33871656 |
#7
|
||||
|
||||
Цитата:
Файл я смог восстановить (как я понял в нём только одна функция "StrBreakApart" взятая >>отсюда<<), а вот иконки не восстановил... |
#8
|
|||
|
|||
Код:
procedure StrBreakApart(const S, Delimeter: string; Parts: TStrings); begin Parts.text:=StringReplace(S, Delimeter, #13#10, [rfReplaceAll, rfIgnoreCase]); end; |
#9
|
|||
|
|||
с иконками и процедурой StrBreakApart - разбивает строку, разделённую разделителем и пишет её в StringList
http://zalil.ru/33871739 |
#10
|
||||
|
||||
Цитата:
|
#11
|
|||
|
|||
проблема - когда первый столбец достаточно широк, определение ширины окна работает неправильно, так как канва текущего label ограничивается канвой формы ((( придётся расширять форму прежде, а потом её снова уменьшать...
завтра надо будет сделать ещё первый столбец названий переменных, например: Фамилия Имя Отчество а уж потом эти два с самими старыми и новыми значениями... |
#12
|
|||
|
|||
делал это окошко для удобного отображения при изменении записи базы данных, старые и новые значения.. а также для добавления и удаления...
вот ещё - надо будет сделать отображение красным цветом текста, изменённого значения |
#13
|
||||
|
||||
Цитата:
|
#14
|
|||
|
|||
думал над этим, но отказался, так как подгрузить иконки текущим способом гораздо проще, чем каждый раз генерировать файл ресурсов при написании очередного модуля bpl, программа состоит из модулей и с возможностью их наращивания
|
#15
|
||||
|
||||
Цитата:
|