Page 1 of 1
Label overlaps text
Posted: Fri Oct 30, 2009 6:33 pm
by palmeira
Sometimes a label overlaps the text just after it. I am sending a document file by e-mail.
Posted: Fri Oct 30, 2009 9:06 pm
by proxy3d
You tell about SRV version 2.4 or 2.5?
Posted: Tue Nov 03, 2009 2:34 am
by palmeira
I am using SRV 2.4.1. If you want me to see if things are different with SRV 2.5, please send me instructions on how to download and install it.
Posted: Tue Nov 03, 2009 7:24 am
by proxy3d
I have sent you the link on email
Posted: Tue Nov 03, 2009 1:32 pm
by palmeira
Thanks for the link. I have just installed SRV 2.5, and the problem is still present.
Posted: Tue Nov 03, 2009 4:02 pm
by proxy3d
Send please the document and PrintScreen to me on email.
Posted: Tue Nov 03, 2009 7:28 pm
by palmeira
The files have been sent.
Posted: Mon Nov 09, 2009 7:53 pm
by mwilems1
I am having a similar problem. After installing SRVControls and SRV2.4.1 using source code you sent 11/7, I can successfully insert and display a subclass of SRVLabel. This is the only one I have tested. I can set the width of the object when I create it, but if I try to change that width, it will temporarily overwrite the text behind it and then when the DBSRichViewEdit refreshes or realigns (not sure which causes this) the label goes back to the original size.
Posted: Mon Nov 09, 2009 9:27 pm
by proxy3d
For SRVLabel there is property AutoSize. By default it is TRUE.
PS: do not use in SRVLabel raster fonts. Raster fonts have problems with scaling in Windows. To use vector fonts.
Posted: Mon Nov 09, 2009 9:48 pm
by mwilems1
Just using Ariel 12pt. Actually don't know if that is raster or vector and so frustrated after trying to get component insert/move/resize working is SRV for the last three days with only one day left before a meeting.
I tried inserting a subclass of TSRVLabel using:
But it did not insert. I went back to:
Code: Select all
DBSRVEdit.RichViewEdit.InsertControl('myLabelName',myLabel,rvvaAbsMiddle);
But then setting AutoResize := true does nothing. I can accomplish this by using:
Code: Select all
DBSRVEdit.RichViewEdit.SetCurrentItemExtraIntProperty(rvepResizable,1,true);
But I'm still having problems with the
Code: Select all
DBSRVEdit.RichViewEdit.BeginOleDrag.
Am I just doing this SRVControl insert all wrong?
Posted: Mon Nov 09, 2009 10:24 pm
by proxy3d
See example: Demos\Controls\InsertControls\
Code for insert in SRV:
Code: Select all
procedure TFInsertControls.ToolButton5Click(Sender: TObject);
var
c : TSRVLabel;
begin
c := TSRVLabel.Create(nil);
c.Parent := SRichViewEdit1.RichViewEdit;
c.Name := 'SRVLabel';
c.Caption := 'SRVLabel';
c.AutoResize := FALSE; // <<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<< AutoResize
SRichViewEdit1.RichViewEdit.InsertControl('teste', c, rvvaMiddle);
end;
SRVLabel has the same properties as usual TLabel and works similarly.
Posted: Wed Nov 11, 2009 11:12 pm
by proxy3d
Corrected RVLabel and SRVLabel will be uploaded in next update.