freepascal.ru

B4rr4cuda писал(а):Насколько я вижу, ручного OnMouseUp не объявлено вообще

н присваивается в fMain, из него и происходит вызов меню.
Хотя у меня есть одна идея почему не работает, надо проверить.

procedure TPanelColumnsClass.Load(FileName:string);
var Ini:TIniFile;
begin
  try
    Ini:=TIniFile.Create(FileName);
    Load(Ini);
  finally
    Ini.Free;
  end;

procedure TPanelColumnsClass.Save(FileName: string);
 var Ini:TIniFile;
begin
  try
    Ini:=TIniFile.Create(FileName);
     Save(Ini);
  finally
    Ini.Free;
  end;
end; 

И какие вообще планы и мысли по поводу WLX:?:

Я недавно тоже немного копался в доках по Х, правда по поводу того как сделать терминал.

Даже если XReparentWindow(display, w, parent, x, y) подойдет, то как получить parent, т.е. окно просмоторщика?

B4rr4cuda писал(а):

Я недавно тоже немного копался в доках по Х, правда по поводу того как сделать терминал.

Я тоже рыскал по поводу терминала, вот что надумал - берем компонент CmdLine дорабатываем маленько для собственного удобства.

Из плагина? Очень просто. Просмотрщик сам его передает плагину в функции ListLoad(ParentWin:HWND; FileToLoad:string; ShowFlags:integer):HWND;

Э не понял, что за компонент CmdLine.

Не, как просмоторщик узнает, так сказать Handle своего окна, чтобы передать плагину?

B4rr4cuda писал(а):

Э не понял, что за компонент CmdLine.

Этот

Не, как просмоторщик узнает, так сказать Handle своего окна, чтобы передать плагину?

Form1.handle или panel1.handle или ещё какой нить хандле. Viewer1.handle например.

Every TWinControl has a Handle, and the LCL does not need to know, what a Handle is. The meaning of the Handle is totally up to the interface:

* under gtk a Handle is often a PGtkWidget
* under windows a Handle is often a HWnd.
* under Carbon a Handle is often a object descendant of TCarbonWidget.
* under Qt, a Handle is often a pointer to a object descendent of TQtWidget.

Или к формам это не относится?

   void Receiver::setParent( QDialog *parent )

void QWidget::reparent ( QWidget * parent, WFlags f, const QPoint & p, bool showIt = FALSE ) [virtual] 
 Reparents the widget. The widget gets a new parent, new widget flags (f, but as usual, use 0) at a new position in its new parent (p).

gtk_widget_reparent ()
void        gtk_widget_reparent             (GtkWidget *widget,
                                             GtkWidget *new_parent);
 Moves a widget from one GtkContainer to another, handling reference count issues to avoid destroying the widget.
widget :   a GtkWidget 
  new_parent :   a GtkContainer to move the widget into