Ignore:
Timestamp:
Feb 28, 2018, 12:56:11 PM (7 years ago)
Author:
chronos
Message:
  • Added: New Generate contacts Tools menu action to generate multiple random contacts.
File:
1 edited

Legend:

Unmodified
Added
Removed

  • trunk/Forms/UFormMain.pas

    r16 r17  
    1919    MenuItem3: TMenuItem;
    2020    MenuItem4: TMenuItem;
     21    MenuItem5: TMenuItem;
    2122    MenuItemToolbar: TMenuItem;
    2223    MenuItemView: TMenuItem;
    … …  
    111112  Control: TControl;
    112113begin
    113  for J := 0 to CoolBar1.ControlCount - 1 do begin
     114  for J := 0 to CoolBar1.ControlCount - 1 do begin
    114115    Control := CoolBar1.Controls[J];
    115116    if Control is TToolBar then begin
Note: See TracChangeset for help on using the changeset viewer.