Search found 56 matches

by mamouri
Mon Mar 23, 2009 4:25 pm
Forum: Support
Topic: Translucent TRichView Control
Replies: 2
Views: 15927

Hi, I create a small component descanted from TCustomControl which hold a TRichView inside itself and Paint RichView content into it's canvas. Here it's: unit TransparentRichView; interface uses Messages, Windows, Classes, Forms, Graphics, Controls, RichView; type TTransparentRichView = class ...
by mamouri
Mon Mar 23, 2009 6:32 am
Forum: Support
Topic: Translucent TRichView Control
Replies: 2
Views: 15927

Ok... I think I make things too complicated. Simply I need a transparent RichView control. :)
by mamouri
Mon Mar 23, 2009 4:42 am
Forum: Support
Topic: Translucent TRichView Control
Replies: 2
Views: 15927

Translucent TRichView Control

Hi, I want to create a translucent TRichView control. Background of the control should be translucent (for example with Alpha = 155) and Texts are fully visible. There are two ideas I'm thinking of for creating such controlg: 1- Paint TRichView into another Canvas and change alpha of white pixels ...
by mamouri
Wed Mar 21, 2007 5:51 am
Forum: Support
Topic: Annotation in TRichViewEdit
Replies: 2
Views: 13338

Oh, Sorry I am such a freak. :( But anyway Thank you :oops:
by mamouri
Tue Mar 20, 2007 7:57 am
Forum: Support
Topic: Annotation in TRichViewEdit
Replies: 2
Views: 13338

Annotation in TRichViewEdit

Hi, I want implement a very simple annotation in TRichViewEdit. Storing annotation text inside TRichView using item tags could done simply. Also every time user need to see the Annotation I could read it from the item tags. But what I want to do is showing Annotation visually to users (Like ...
by mamouri
Sat Mar 17, 2007 7:15 am
Forum: Support
Topic: Document attachments?
Replies: 18
Views: 74578

Hi jbovey
It would be great if you share it with us
by mamouri
Sat Mar 03, 2007 5:48 am
Forum: Support
Topic: Copy/paste without using the clipboard
Replies: 4
Views: 19010

I think you could use this: var AStream: TMemoryStream; begin AStream := TMemoryStream.Create; RichViewEdit1.SaveRVFToStream(AStream, True); // Copy the Selection into Stream AStream.Position:=0; RichViewEdit2.InsertRVFFromStream(AStream); RichViewEdit2.Format; end; I type the code in editor. may be ...
by mamouri
Tue Feb 27, 2007 5:01 pm
Forum: Support
Topic: Document attachments?
Replies: 18
Views: 74578

Thank you Sergey for optimization and code correction.
by mamouri
Mon Feb 26, 2007 1:10 pm
Forum: Support
Topic: Document attachments?
Replies: 18
Views: 74578

Actually writing this component is not so hard. I did not have enough time But I wrote a very simple component: unit RVAttachedFile; interface uses SysUtils, Classes, Controls, Windows, Registry, ShellAPI, Variants, Graphics; type PHICON = ^HICON; TRVAttachedFile = class(TGraphicControl) private ...
by mamouri
Mon Feb 26, 2007 12:38 pm
Forum: Support
Topic: Document attachments?
Replies: 18
Views: 74578

I would just get the icon from the file at the time it was attached. I did not think this is right approach. Assume user attached a DOC file when he has installed Microsoft Office 2003. A week later he/she may upgrade to Microsoft Office 2007. Then we he/she open the document, will see icon of old ...
by mamouri
Mon Feb 26, 2007 12:24 pm
Forum: Support
Topic: Document attachments?
Replies: 18
Views: 74578

>> but can this be done at any point in the document by an enduser? One of the most important advantages of TRichView is that you could insert component in every position of the document. Actually all component derived from TControls can add to TRichView. These controls could easily save into ...
by mamouri
Mon Feb 26, 2007 12:19 pm
Forum: Support
Topic: Document attachments?
Replies: 18
Views: 74578

I forgot to mention that Compnent Paint method should paint corresponding file icon in regard to FileType property and the FileName.
by mamouri
Mon Feb 26, 2007 12:18 pm
Forum: Support
Topic: Document attachments?
Replies: 18
Views: 74578

Actually for my use it should not show a picture to end user. But Yes you could inherit the component from TGraphicControl. I think in your case the component should named TRVAttachedDoc. This TRVAttachedDoc should has 3 property 1- FileName: String 2- Content: TFileStream 3- FileType: TRVFileType ...
by mamouri
Mon Feb 26, 2007 11:40 am
Forum: Support
Topic: Document attachments?
Replies: 18
Views: 74578

Andrew, I think there is more easier and flexible way. You could write a small component that derived from TControl and named TDocRepository. It should has a property named Attachments: TOwnedCollectionItem. "Attachments" class TCollectionItem should be another class named "Attachment" with a ...
by mamouri
Thu Feb 22, 2007 4:15 pm
Forum: Support
Topic: OnProgress in RichViewEdit and LoadRVF
Replies: 5
Views: 24665

Could you please make this available in next version? I need it urgently for my project.

Thank you