powered by simpleCommunicator - 2.0.49     © 2025 Programmizd 02
Форумы / Отчетные системы [игнор отключен] [закрыт для гостей] / Подскажите какой ActiveX?
2 сообщений из 2, страница 1 из 1
Подскажите какой ActiveX?
    #33439022
Отчет
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Подскажите какой ActiveX использовать для просмотра отчета (crystal report
11) на своей форме? Работаю в делфи, использую crpe для просмотра, но он выдает свое окно предварительного просмотра, а хотелось бы разместить отчет в своей форме.
...
Рейтинг: 0 / 0
Подскажите какой ActiveX?
    #33440643
?
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
?
Гость
ActiveX тебе не нужен, дай ему это

procedure TForm1.FormCreate(Sender: TObject);
begin
Crpe1.WindowParent := Self;
Crpe1.WindowSize.Top := 1;
Crpe1.WindowSize.Left := 1;
Crpe1.WindowSize.Height := Self.ClientHeight-1;
Crpe1.WindowSize.Width := Self.ClientWidth-1;
Crpe1.WindowStyle.SystemMenu := False;
Crpe1.WindowStyle.BorderStyle := bsNone;
end;

procedure TForm1.FormResize(Sender: TObject);
var
MyWindow : hWnd;

begin
MyWindow := Crpe1.ReportWindowHandle;
SetWindowPos(MyWindow, HWND_TOP, 0, 1, Self.ClientWidth-1,
Self.ClientHeight-1, SWP_NOZORDER);
end;

добавить если форма fsMDIChild:

procedure TForm1.FormClose(Sender: TObject; var Action: TCloseAction);
begin
action:=cafree;
end;

если не жалко дай VCL crpe для 11 Кристала > zamuruev@list.ru
Удачи
...
Рейтинг: 0 / 0
2 сообщений из 2, страница 1 из 1
Форумы / Отчетные системы [игнор отключен] [закрыт для гостей] / Подскажите какой ActiveX?
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]