TfrxADSSQLProperty = class(TfrxClassProperty)
public
function GetAttributes: TfrxPropertyAttributes; override;
function Edit: Boolean; override;
end;
function TfrxADSSQLProperty.Edit: Boolean;
begin
with TfrxADSSQLEditorForm.Create(Designer) do
begin
Query := TfrxADSQuery(Component);
Result := ShowModal = mrOk;
if Result then
Self.Designer.UpdateDataTree;
Free;
end;
end;
function TfrxADSSQLProperty.GetAttributes: TfrxPropertyAttributes;
begin
Result := [paDialog, paReadOnly];
end;
initialization
frxPropertyEditors.Register(TypeInfo(TStrings), TfrxADSQuery, 'SQL',
TfrxADSSQLProperty);
Где: TfrxADSSQLEditorForm Ваша форма, TfrxADSQuery - сам ADS компонент.
Ой, извините, сразу не уточнила, что я работаю в FR4 и ADS сервер 9 версии. Этот компонент для FR3, который вы указали, нельзя использовать в FR4 версии?
Может еще кто откликнется со ссылочкой для нужной мне версии?
Здравствуйте! Решила «поднять» ранее открытую тему. Повторю свой ранее заданный вопрос. Я работаю в FR4 и Advantage сервер 9-ой версии. Ищу ADS (advantage) компонент для фаст-репорт4. Кто-нибудь написал или может подскажите где можно скачать?
Заранее спасибо,
Надежда
Комментарии
Где: TfrxADSSQLEditorForm Ваша форма, TfrxADSQuery - сам ADS компонент.
Подсмотрел в исходника FastReport'a
Я ищу ADS (advantage) компонент для фаст-репорт4. Кто-нибудь написал или может подскажите где можно скачать?
Заранее спасибо,
Надежда
http://rapidshare.com/files/410001215/Fast...x_Component.rar
Ой, извините, сразу не уточнила, что я работаю в FR4 и ADS сервер 9 версии. Этот компонент для FR3, который вы указали, нельзя использовать в FR4 версии?
Может еще кто откликнется со ссылочкой для нужной мне версии?
Заранее спасибо,
Надежда