Resize comments

[ykarapinar]

Code: Select all

XLSReadWriteII51.Filename:='C:\XLSRWII.xlsx';
XLSReadWriteII51[0].Comments.Add(1, 1, '', 'text');
XLSReadWriteII51.Write;

Hello
How can I resize comments?

[larsa]

Hello

Use the Col1,Col2,Col1Offs,Col2Offs,Row ... properties of the TXLSComment.Xc12Comment object.

[ykarapinar]

Hello

Can you send code example please

[ykarapinar]

I couldn't find how to use it, please can you give an example of its usage?

[larsa]

Hello

Code: Select all

  C: TXLSComment;
begin
  C := FXSS.XLS[0].Comments.Add(1, 1, '', 'text');
  C.Xc12Comment.Col1 := 5;

[ykarapinar]

Code: Select all

var
  C: TXLSComment;
begin
  XLS.Filename:='C:\XLS.xlsx';
  C := XLS[0].Comments.Add(1, 1, '', 'text');
  C.Xc12Comment.Col1 := 5;
  C.Xc12Comment.Col2 := 8;
  XLS.Write;
end;

I still can't resize. Am I missing something?

[ykarapinar]

Hello
The sample code you have send is not resizing the dimensions of comments window. Can you please send a working code?