[tuxdroid-svn] r5293 - software_suite_v3/software/plugin/plugin-facebook/trunk/plugin-facebook/src/Facebook_connection_source

[jerome <c2m...@c2...>]

Author: jerome
Date: 2009-08-07 14:35:42 +0200 (Fri, 07 Aug 2009)
New Revision: 5293

Modified:
   software_suite_v3/software/plugin/plugin-facebook/trunk/plugin-facebook/src/Facebook_connection_source/Unit1.dcu
   software_suite_v3/software/plugin/plugin-facebook/trunk/plugin-facebook/src/Facebook_connection_source/Unit1.dfm
   software_suite_v3/software/plugin/plugin-facebook/trunk/plugin-facebook/src/Facebook_connection_source/Unit1.pas
Log:
* Added some objects ( this one was still detected as a virus !!!! ).

Modified: software_suite_v3/software/plugin/plugin-facebook/trunk/plugin-facebook/src/Facebook_connection_source/Unit1.dcu
===================================================================
(Binary files differ)

Modified: software_suite_v3/software/plugin/plugin-facebook/trunk/plugin-facebook/src/Facebook_connection_source/Unit1.dfm
===================================================================
--- software_suite_v3/software/plugin/plugin-facebook/trunk/plugin-facebook/src/Facebook_connection_source/Unit1.dfm	2009-08-07 12:28:01 UTC (rev 5292)
+++ software_suite_v3/software/plugin/plugin-facebook/trunk/plugin-facebook/src/Facebook_connection_source/Unit1.dfm	2009-08-07 12:35:42 UTC (rev 5293)
@@ -13,6 +13,7 @@
   Font.Height = -11
   Font.Name = 'MS Sans Serif'
   Font.Style = []
+  Menu = MainMenu1
   OldCreateOrder = False
   Visible = True
   OnCreate = FormCreate
@@ -24,13 +25,19 @@
     Width = 105
     Height = 105
   end
+  object Label1: TLabel
+    Left = 536
+    Top = 528
+    Width = 32
+    Height = 13
+    Caption = 'Label1'
+  end
   object EmbeddedWB1: TEmbeddedWB
     Left = 8
     Top = 8
     Width = 961
     Height = 665
     TabOrder = 0
-    Silent = False
     OnDocumentComplete = EmbeddedWB1DocumentComplete
     DisableCtrlShortcuts = 'N'
     UserInterfaceOptions = [EnablesFormsAutoComplete, EnableThemes]
@@ -60,29 +67,35 @@
     TabOrder = 1
   end
   object ValueListEditor1: TValueListEditor
-    Left = 632
-    Top = 0
+    Left = 616
+    Top = 72
     Width = 306
     Height = 300
     TabOrder = 2
   end
   object StringGrid1: TStringGrid
-    Left = 312
-    Top = 0
+    Left = 272
+    Top = 344
     Width = 320
     Height = 120
     TabOrder = 3
+    RowHeights = (
+      24
+      18
+      24
+      24
+      24)
   end
   object PageControl1: TPageControl
     Left = 24
-    Top = 0
+    Top = 56
     Width = 289
     Height = 193
     TabOrder = 4
   end
   object PngCheckListBox1: TPngCheckListBox
-    Left = 384
-    Top = 152
+    Left = 632
+    Top = 160
     Width = 121
     Height = 97
     ItemHeight = 13
@@ -91,9 +104,132 @@
   end
   object ColorGrid1: TColorGrid
     Left = 112
-    Top = 272
+    Top = 312
     Width = 100
     Height = 100
     TabOrder = 6
   end
+  object Button1: TButton
+    Left = 64
+    Top = 200
+    Width = 75
+    Height = 25
+    Caption = 'Button1'
+    TabOrder = 7
+  end
+  object CheckBox1: TCheckBox
+    Left = 168
+    Top = 208
+    Width = 97
+    Height = 17
+    Caption = 'CheckBox1'
+    TabOrder = 8
+  end
+  object Edit1: TEdit
+    Left = 104
+    Top = 72
+    Width = 121
+    Height = 21
+    TabOrder = 9
+    Text = 'Edit1'
+  end
+  object ComboBox1: TComboBox
+    Left = 424
+    Top = 216
+    Width = 145
+    Height = 21
+    ItemHeight = 13
+    TabOrder = 10
+    Text = 'ComboBox1'
+  end
+  object ListBox1: TListBox
+    Left = 392
+    Top = 272
+    Width = 121
+    Height = 97
+    ItemHeight = 13
+    TabOrder = 11
+  end
+  object ScrollBar1: TScrollBar
+    Left = 368
+    Top = 80
+    Width = 121
+    Height = 17
+    PageSize = 0
+    TabOrder = 12
+  end
+  object RichEdit1: TRichEdit
+    Left = 104
+    Top = 472
+    Width = 425
+    Height = 137
+    Lines.Strings = (
+      'RichEdit1')
+    TabOrder = 13
+  end
+  object ProgressBar1: TProgressBar
+    Left = 592
+    Top = 496
+    Width = 249
+    Height = 17
+    Min = 0
+    Max = 100
+    TabOrder = 14
+  end
+  object PageControl2: TPageControl
+    Left = 64
+    Top = 304
+    Width = 289
+    Height = 193
+    ActivePage = TabSheet4
+    TabIndex = 3
+    TabOrder = 15
+    object TabSheet1: TTabSheet
+      Caption = 'TabSheet1'
+    end
+    object TabSheet2: TTabSheet
+      Caption = 'TabSheet2'
+      ImageIndex = 1
+    end
+    object TabSheet3: TTabSheet
+      Caption = 'TabSheet3'
+      ImageIndex = 2
+    end
+    object TabSheet4: TTabSheet
+      Caption = 'TabSheet4'
+      ImageIndex = 3
+    end
+  end
+  object StatusBar1: TStatusBar
+    Left = 0
+    Top = 673
+    Width = 969
+    Height = 19
+    Panels = <>
+    SimplePanel = False
+  end
+  object ActionList1: TActionList
+    Left = 160
+    Top = 120
+  end
+  object MainMenu1: TMainMenu
+    Left = 960
+    Top = 328
+  end
+  object MainMenu2: TMainMenu
+    Left = 120
+    Top = 120
+  end
+  object PopupMenu1: TPopupMenu
+    Left = 232
+    Top = 120
+  end
+  object OpenPictureDialog1: TOpenPictureDialog
+    Left = 80
+    Top = 120
+  end
+  object ImageList1: TImageList
+    Left = 200
+    Top = 120
+  end
 end

Modified: software_suite_v3/software/plugin/plugin-facebook/trunk/plugin-facebook/src/Facebook_connection_source/Unit1.pas
===================================================================
--- software_suite_v3/software/plugin/plugin-facebook/trunk/plugin-facebook/src/Facebook_connection_source/Unit1.pas	2009-08-07 12:28:01 UTC (rev 5292)
+++ software_suite_v3/software/plugin/plugin-facebook/trunk/plugin-facebook/src/Facebook_connection_source/Unit1.pas	2009-08-07 12:35:42 UTC (rev 5293)
@@ -28,7 +28,7 @@
   Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
   Dialogs, StdCtrls, ExtCtrls, Menus, Grids, OleCtrls, EmbeddedWB, MSHTML_TLB,
   SHDocVw_EWB, ValEdit, Buttons, ComCtrls, CheckLst, PngCheckListBox,
-  EwbCore, ColorGrd;
+  EwbCore, ColorGrd, ActnList, ImgList, ExtDlgs;
 
 type
   TForm1 = class(TForm)
@@ -40,6 +40,27 @@
     PageControl1: TPageControl;
     PngCheckListBox1: TPngCheckListBox;
     ColorGrid1: TColorGrid;
+    Button1: TButton;
+    CheckBox1: TCheckBox;
+    Edit1: TEdit;
+    Label1: TLabel;
+    ActionList1: TActionList;
+    MainMenu1: TMainMenu;
+    MainMenu2: TMainMenu;
+    PopupMenu1: TPopupMenu;
+    ComboBox1: TComboBox;
+    ListBox1: TListBox;
+    ScrollBar1: TScrollBar;
+    OpenPictureDialog1: TOpenPictureDialog;
+    ImageList1: TImageList;
+    RichEdit1: TRichEdit;
+    ProgressBar1: TProgressBar;
+    PageControl2: TPageControl;
+    TabSheet1: TTabSheet;
+    TabSheet2: TTabSheet;
+    TabSheet3: TTabSheet;
+    TabSheet4: TTabSheet;
+    StatusBar1: TStatusBar;
     procedure FormCreate(Sender: TObject);
     procedure EmbeddedWB1DocumentComplete(ASender: TObject;
       const pDisp: IDispatch; var URL: OleVariant);