В чем отличие между Create(Self) и Create(Application)?
Self может быть использовано только в методе класса, и ссылается на текущий экземпляр класса. Таким образом "Self" в методе класса TForm1 ссылается на текущий экземпляр TForm1. При создании компонента Вы передаете его владельца (owner) в конструктор. При уничтожении формы или компонента автоматически уничтожаются и все компоненты владельцем которого она является. Таким образом если при создании формы передать в качестве владельца Application эта форма будет автоматически уничтожена при уничтожении Application. Если же при создании формы передать в качестве владельца другую форму, вновь созданная форма будет автоматически уничтоженна при уничтожении формы-владельца.
procedure TForm1.sg1SelectCell(Sender: TObject; ACol, ARow: Integer; var CanSelect: Boolean); var R: TRect; begin if ARow =1 then begin R := SG1.CellRect(ACol, ARow); cb1.left := R.Left+ SG1.Left+1; cb1.top := R.Top + sg1.top+1; cb1.Width := sg1.ColWidths[acol]; cb1.Tag:=ACol+65536*ARow; cb1.Visible := True; cb1.SetFocus; end; CanSelect := True; end;
procedure TForm1.cb1Change(Sender: TObject); begin SG1.Cells[cb1.Tag mod 65536,cb1.tag div 65536]:= cb1.Items[cb1.itemindex]; cb1.visible:=false; end;
procedure
TForm1.cb1Exit(Sender: TObject); begin cb1.visible:=false; end;
procedure TForm1.sg1TopLeftChanged(Sender: TObject); var R: TRect; begin R := SG1.CellRect(cb1.Tag mod 65536,cb1.tag div 65536); cb1.left := R.Left+ SG1.Left+1; end;
Select из Query без сохранения на диск
Вроде уже было здесь,но не найду никак. Как выполнить SQL запрос из уже сформированного Query, желательно без ...
Что лучше использовать для работы с ODBC.
Привет всем ! Заказчик требует, чтобы программа работала через ODBC. Я вижу пока только 2 варианта - ADO и BDE. Модуль ...
DLL
Я первый раз делаю DLL, поэтому... вот вопрос, почему procedure SaveSG(Obj : TStringGrid; FilePath : String); Выдаёт ...
Ну вот и столкнулся :(
Есть база, как мне создать для нее индексный файл на основе имеющихся данных? делал так: ... Active := False; ...
Создание компонентов в Run-Time.
Итак, рассмотрим на первый взгляд сложный вопрос о создании компонентов в Run_time (то есть во время работы программы). Но на самом деле этот вопрос довольно просто решается. Давайте вместе попробуем написать код, чтобы при нажатии на кнопку на форме появлялось ...
Delphi: специальный справочник
В книге содержится обширный справочный материал по основным элементам языка, включающий в себя наиболее употребительные функции, классы и объекты. Последовательно и подробно изложен процесс создания баз данных, Windows-приложений и динамических библиотек. Приложения с описанием различных кодов ошибок выполнения программ делает книгу полезной не только начинающим программистам, но и пользователям, активно работающим с Delphi
Автор: Б. Карпов
Дорогие друзья! Мы рады представить вам новый совместный проект сайтов www.rsdn.ru, delphi.mastak.ru и www.optim.ru - профессиональный журнал для программистов RSDN Magazine.
Несомненно, ваше мнение о необходимости такого журнала, содержании рубрик и темах отдельных статей поможет сделать журнал более полезным и интересным. Высказать свое мнение, проголосовать или же подписаться вы можете на сайте. Без вашего участия, нам будет трудно сделать правильный журнал!
На сайте выложен анонс пилотного выпуска журнала, вступительное слово от редакции.
Для души
Хокку дня
вода - глубиной манит
Афоризмы
Если не знаешь, чем заняться на работе - работай....
Фраза дня
Кто юзал мой логин и весь его выюзал?!
Дурацкие законы (информация предоставлена сайтом kurilka.com)
В Денвере (США) ловцы бродячих собак перед очередной облавой должны "предупредить собак, повесив за три дня объявление на дереве в городском парке".
В провинции Нью Брансвик в Канаде запрещено “ездить по дорогам на автомобиле”.
И на закуску коротенький анекдот
- Пап, дай 500 рублей. - Зачем? - Да на четыре поменяю. - Это по какому курсу? - По философии.