Changeset 244 for oup/current/Tools


Ignore:
Timestamp:
Aug 17, 2007, 11:09:51 PM (17 years ago)
Author:
alloc
Message:
 
Location:
oup/current/Tools
Files:
4 edited

Legend:

Unmodified
Added
Removed

  • oup/current/Tools/MetaEditor.dfm

    r243 r244  
    8585      object tab_hex: TTabSheet
    8686        Caption = 'Binary Edit'
    87         ExplicitLeft = 0
    88         ExplicitTop = 0
    89         ExplicitWidth = 0
    90         ExplicitHeight = 0
    9187        object splitter_hex_1: TSplitter
    9288          Left = 0

  • oup/current/Tools/MetaEditor.pas

    r243 r244  
    101101  data: TNodeData;
    102102  node: PVirtualNode;
     103  basenode: PVirtualNode;
    103104begin
    104105  if FConnectionID <> TreeElem.ConnectionID then
    … …  
    107108  VST.Clear;
    108109  VST.BeginUpdate;
     110  data.Field := root;
     111  basenode := AddVSTEntry(VST, nil, data);
    109112  for i := 0 to root.ChildCount - 1 do
    110113  begin
    111114    data.Field := root.Child[i];
    112     node := AddVSTEntry(VST, nil, data);
     115    node := AddVSTEntry(VST, basenode, data);
    113116    if data.Field.ChildCount > 0 then
    114117      VST.HasChildren[node] := True;

  • oup/current/Tools/Preview.dfm

    r220 r244  
    4747        Visible = False
    4848        OnResize = panel_buttonsResize
    49         ExplicitWidth = 283
    5049        object btn_dec: TButton
    5150          Left = 0

  • oup/current/Tools/Preview.pas

    r220 r244  
    66  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
    77  Dialogs, _TemplateFileList, Menus, StdCtrls, ExtCtrls, Buttons,
    8   TypeDefs, OniImgClass;
     8  TypeDefs, OniImgClass, VirtualTrees, ComCtrls;
    99
    1010type
Note: See TracChangeset for help on using the changeset viewer.