Показать сообщение отдельно
  #8  
Старый 29.03.2009, 17:21
BloodFooria BloodFooria вне форума
Новичок
 
Регистрация: 30.10.2008
Адрес: Улан-Удэ
Сообщения: 81
Репутация: 10
По умолчанию

Ничего подобного делать не надо

Просто скидываем в папку с программой файлы RyMenus.
В Uses нужного Unit'а прописываем RyMenus. Ну и дальше то, что я описал.

Для примера простенький код:
Код:
unit Main;

interface

uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Menus, RyMenus;

type
  TMainForm = class(TForm)
    { Здесь идут различные компоненты, процедуры и функции }
  public
    constructor Create(AOwner: TComponent); override;

var
  MainForm: TMainForm;

implementation

{$R *.dfm}

{ Меню в стиле RyMenu }
constructor TMainForm.Create(AOwner: TComponent);
begin
  inherited;
  RyMenu.Add(MainMenu);
  RyMenu.MinHeight:= 23;
  RyMenu.Font.Name:= 'Arial';
  RyMenu.Font.Size:= 8;
end;

end.

Помню когда я писал свой третий проект Delphi. Я тогда знал еще меньше, чем вы сейчас
__________________
Auta i Lome...
Ответить с цитированием