archive-com.com » COM » E » EFG2.COM

Total: 878

Choose link from "Titles, links and description words view":

Or switch to "Titles and links view".

  • 10 23 31 0500 Chris LeFebvre wrote I believe that I see what was causing the problem I was using tpaintbox font color instead of tpaintbox canvas font color and at the risk of showing my ignorance and setting off a storm of criticism why one instead of the other TPaintBox Font Color as well as TPaintBox Color is a for your information property It s for the use of

    Original URL path: http://www.efg2.com/Lab/Library/UseNet/1999/1115.txt (2016-02-14)
    Open archived version from archive



  • Apr 2001 09 13 27 0700 Lines 25 Path dnews Xref dnews borland public delphi graphics 37034 In article Pierre Meyer wrote Hello Though I am not new to pascal I am rather new to Delphi 2 years and do not know all the quirks of components One annoying problem is Tpaintbox seems to have the property color At least it shows in the inspector Hi Pierre If you want

    Original URL path: http://www.efg2.com/Lab/Library/UseNet/2001/0405b.txt (2016-02-14)
    Open archived version from archive


  • 134 126 X Trace dnews 986465532 194 25 134 126 5 Apr 2001 03 12 12 0700 Path dnews newsfeed01 sul t online de newsfeed00 sul t online de newsmm00 sul t online com t online de news t online com not for mail Xref dnews borland public delphi graphics 37025 The property color is defined in TComponent TPaintBox is a descendant of TComponent the same as TButton But TPaintBox

    Original URL path: http://www.efg2.com/Lab/Library/UseNet/2001/0405a.txt (2016-02-14)
    Open archived version from archive


  • graphic to use with TPicture you must override at least TGraphic LoadFromStream TGraphic SaveToStream TGraphic Draw TGraphic GetHeight TGraphic GetWidth TGraphic SetWidth TGraphic SetHeight You may want to override TPersistent Assign Source TPersistent TPersistent AssignTo Dest TPersistent TGraphic LoadFromClipboardFormat TGraphic SaveToClipboardFormat Hope this helps Michel http www cam org mibra spider Envision Image Library Spider Object Database Spider Container and Persistent Classes freeware WordShare string localization freeware Larry J Rutledge

    Original URL path: http://www.efg2.com/Lab/Library/UseNet/1999/0605.txt (2016-02-14)
    Open archived version from archive


  • const Name string ReadData WriteData TStreamProc HasData Boolean override procedure FlushBuffer override end Since I use TFiler only partially the inherited constructor TFiler Create is unnecessary so I use this dummy constructor TPictureFiler Create begin end will be called by TPicture handing over the private methods to read write TPicture from to Stream procedure TPictureFiler DefineBinaryProperty const Name string ReadData WriteData TStreamProc HasData Boolean begin if Name Data then begin Self ReadData ReadData Self WriteData WriteData end end procedure TPictureFiler DefineProperty const Name string ReadData TReaderProc WriteData TWriterProc HasData Boolean begin at this time TPicture don t call this function only implemented as precaution to unlikely changes in future delphi versions end procedure TPictureFiler FlushBuffer begin at this time TPicture don t call this function only implemented as precaution to unlikely changes in future delphi versions end Wrapper to call protected TPicture DefineProperties must be in same unit as ReadWritePictureFromStream type TMyPicture class TPicture end procedure ReadWritePictureFromStream Picture TPicture Stream TStream Read Boolean var Filer TPictureFiler begin Filer TPictureFiler Create try TPicture DefineProperties is protected but TMyPicture is declared in this unit TMyPicture s protected members also the inherited are public to this unit TMyPicture Picture DefineProperties Filer TPicture DefineProperties calls Filer DefineBinaryProperty if Read then Filer ReadData Stream TPicture does the work else Filer WriteData Stream TPicture does the work finally Filer Free end end whatever TIcons actual image size its LoadFromStream Stream TStream reads just to the end of the stream if I have additional things after TIcon streamed they are lost after TIcon LoadFromStream so I store the actual size before in the stream procedure WritePictureToStream Picture TPicture Stream TStream var MStream TMemoryStream iPictureSize Integer begin MStream TMemoryStream Create try ReadWritePictureFromStream Picture MStream False store TPicture data in TMemoryStream iPictureSize MStream Size Stream WriteBuffer iPictureSize sizeof iPictureSize

    Original URL path: http://www.efg2.com/Lab/Library/UseNet/1999/0509b.txt (2016-02-14)
    Open archived version from archive


  • 0 Reply To The Patrician Hotmail com Newsgroups borland public delphi graphics function PictureToBitmap Pic TPicture TBitmap begin Result nil if not Assigned Pic or not Assigned Pic Graphic then Exit Result TBitmap Create Result Width Pic Width Result Height Pic Height Result Canvas Draw 0 0 Pic Graphic You can draw any TGraphic on a TCanvas A TBitmap includes a TCanvas end Now all you need to do is

    Original URL path: http://www.efg2.com/Lab/Library/UseNet/1999/0513.txt (2016-02-14)
    Open archived version from archive


  • Field TField var DrawPict TPicture begin DrawPict TPicture Create try if Assigned Field and Field IsBlob then begin DrawPict Assign Field if DrawPict Graphic nil or DrawPict Graphic Empty then FillRect ClientRect else StretchDraw ClientRect DrawPict Graphic finally DrawPict Free end end With best regards Mike Shkolnik FIDO 2 463 106 14 E Mail mshkolnik rs ukraine kiev ua mike woccu freenet kiev ua WEB http www geocities com SiliconValley

    Original URL path: http://www.efg2.com/Lab/Library/UseNet/1999/0517b.txt (2016-02-14)
    Open archived version from archive


  • 09 34 0800 195 179 54 98 MIME Version 1 0 Newsgroups borland public delphi vcl components using Mark Erbaugh wrote Is there a way to put a TProgressBar component into a panel on a TStatusBar like Internet Explorer and Outlook Express do Creating a ProgressBar in the leftmost panel of a StatusBar var pb TProgressBar begin StatBar ControlStyle StatBar ControlStyle csAcceptsControls pb TProgressBar Create StatBar with pb do begin

    Original URL path: http://www.efg2.com/Lab/Library/UseNet/2000/0713.txt (2016-02-14)
    Open archived version from archive



  •