Changeset 9


Ignore:
Timestamp:
Mar 17, 2011, 9:45:18 AM (14 years ago)
Author:
george
Message:
  • Fixed: Flickering on Win32 resolved by use of DoubleBuffer.
Location:
trunk
Files:
4 edited

Legend:

Unmodified
Added
Removed
  • trunk

    • Property svn:ignore
      •  

        old new  
        22lib
        33backup
         4tunneler.exe
  • trunk/UMainForm.lfm

    r7 r9  
    55  Width = 514
    66  Caption = 'Tunneler'
    7   ClientHeight = 389
     7  ClientHeight = 393
    88  ClientWidth = 514
    99  Menu = MainMenu1
     
    1515  object StatusBar1: TStatusBar
    1616    Left = 0
    17     Height = 17
    18     Top = 372
     17    Height = 20
     18    Top = 373
    1919    Width = 514
    2020    Panels = <   
     
    2929  object Image1: TImage
    3030    Left = 0
    31     Height = 372
     31    Height = 373
    3232    Top = 0
    3333    Width = 514
  • trunk/UMainForm.pas

    r7 r9  
    8282begin
    8383  Randomize;
     84  DoubleBuffered := True;
    8485  Engine.Bitmap := Image1.Picture.Bitmap;
    8586  with Engine do begin
  • trunk/tunneler.lpi

    r8 r9  
    5858        <ResourceBaseClass Value="Form"/>
    5959        <UnitName Value="UMainForm"/>
    60         <EditorIndex Value="7"/>
    61         <WindowIndex Value="0"/>
    62         <TopLine Value="81"/>
    63         <CursorPos X="3" Y="90"/>
     60        <IsVisibleTab Value="True"/>
     61        <EditorIndex Value="2"/>
     62        <WindowIndex Value="0"/>
     63        <TopLine Value="75"/>
     64        <CursorPos X="18" Y="84"/>
    6465        <UsageCount Value="60"/>
    6566        <Loaded Value="True"/>
     
    7071        <IsPartOfProject Value="True"/>
    7172        <UnitName Value="UCore"/>
    72         <IsVisibleTab Value="True"/>
    7373        <EditorIndex Value="0"/>
    7474        <WindowIndex Value="0"/>
    7575        <TopLine Value="229"/>
    76         <CursorPos X="1" Y="250"/>
     76        <CursorPos X="56" Y="242"/>
    7777        <UsageCount Value="60"/>
    7878        <Loaded Value="True"/>
     
    112112        <Filename Value="../../../lazarus/lcl/graphics.pp"/>
    113113        <UnitName Value="Graphics"/>
    114         <EditorIndex Value="1"/>
    115114        <WindowIndex Value="0"/>
    116115        <TopLine Value="2417"/>
    117116        <CursorPos X="3" Y="2459"/>
    118117        <UsageCount Value="12"/>
    119         <Loaded Value="True"/>
    120118      </Unit7>
    121119      <Unit8>
     
    143141      <Unit11>
    144142        <Filename Value="../../PascalClassLibrary/Generics/TemplateGenerics/Generic/GenericMatrix.inc"/>
    145         <EditorIndex Value="8"/>
    146143        <WindowIndex Value="0"/>
    147144        <TopLine Value="52"/>
    148145        <CursorPos X="15" Y="29"/>
    149146        <UsageCount Value="25"/>
    150         <Loaded Value="True"/>
    151147      </Unit11>
    152148      <Unit12>
    153149        <Filename Value="../../PascalClassLibrary/Generics/TemplateGenerics/Specialized/SpecializedMatrix.pas"/>
    154150        <UnitName Value="SpecializedMatrix"/>
    155         <EditorIndex Value="10"/>
    156151        <WindowIndex Value="0"/>
    157152        <TopLine Value="16"/>
    158153        <CursorPos X="22" Y="33"/>
    159154        <UsageCount Value="22"/>
    160         <Loaded Value="True"/>
    161155      </Unit12>
    162156      <Unit13>
     
    177171      <Unit15>
    178172        <Filename Value="../../PascalClassLibrary/Generics/TemplateGenerics/Generic/GenericList.inc"/>
    179         <EditorIndex Value="5"/>
    180173        <WindowIndex Value="0"/>
    181174        <TopLine Value="473"/>
    182175        <CursorPos X="1" Y="60"/>
    183176        <UsageCount Value="22"/>
    184         <Loaded Value="True"/>
    185177      </Unit15>
    186178      <Unit16>
     
    269261        <ResourceBaseClass Value="Form"/>
    270262        <UnitName Value="UMapForm"/>
    271         <EditorIndex Value="6"/>
     263        <EditorIndex Value="1"/>
    272264        <WindowIndex Value="0"/>
    273265        <TopLine Value="15"/>
     
    299291      <Unit31>
    300292        <Filename Value="../../PascalClassLibrary/Generics/TemplateGenerics/Generic/GenericListObject.inc"/>
    301         <EditorIndex Value="11"/>
    302293        <WindowIndex Value="0"/>
    303294        <TopLine Value="1"/>
    304295        <CursorPos X="34" Y="12"/>
    305296        <UsageCount Value="14"/>
    306         <Loaded Value="True"/>
    307297      </Unit31>
    308298      <Unit32>
     
    339329      <Unit36>
    340330        <Filename Value="../../PascalClassLibrary/Generics/TemplateGenerics/Generic/GenericBitmap.inc"/>
    341         <EditorIndex Value="4"/>
    342331        <WindowIndex Value="0"/>
    343332        <TopLine Value="9"/>
    344333        <CursorPos X="32" Y="26"/>
    345334        <UsageCount Value="12"/>
    346         <Loaded Value="True"/>
    347335      </Unit36>
    348336      <Unit37>
    349337        <Filename Value="../../PascalClassLibrary/Generics/TemplateGenerics/Specialized/SpecializedBitmap.pas"/>
    350338        <UnitName Value="SpecializedBitmap"/>
    351         <EditorIndex Value="2"/>
    352339        <WindowIndex Value="0"/>
    353340        <TopLine Value="3"/>
    354341        <CursorPos X="22" Y="20"/>
    355342        <UsageCount Value="12"/>
    356         <Loaded Value="True"/>
    357343      </Unit37>
    358344      <Unit38>
    359345        <Filename Value="../../PascalClassLibrary/Generics/TemplateGenerics/Specialized/SpecializedList.pas"/>
    360346        <UnitName Value="SpecializedList"/>
    361         <EditorIndex Value="3"/>
    362347        <WindowIndex Value="0"/>
    363348        <TopLine Value="91"/>
    364349        <CursorPos X="19" Y="107"/>
    365350        <UsageCount Value="12"/>
    366         <Loaded Value="True"/>
    367351      </Unit38>
    368352      <Unit39>
    369353        <Filename Value="../../PascalClassLibrary/Generics/TemplateGenerics/Generic/GenericListString.inc"/>
    370         <EditorIndex Value="9"/>
    371354        <WindowIndex Value="0"/>
    372355        <TopLine Value="1"/>
    373356        <CursorPos X="1" Y="1"/>
    374357        <UsageCount Value="11"/>
    375         <Loaded Value="True"/>
    376358      </Unit39>
    377359      <Unit40>
Note: See TracChangeset for help on using the changeset viewer.