Delphi OpenOffice Automation SCALC Center Cell Text

Question

안녕하세요 누군가가 다음을 도와 줄 수 있습니까? 델파이와 ootools 툴킷을 통해 텍스트를 SCALC 오픈 오피스 스프레드 시트 셀에 중앙에 놓고 싶습니다.

다음 코드는 작동하지 않습니다.

sRange := '$A$3:$A$3';
ooParams := CreateUnoStruct('com.sun.star.beans.PropertyValue', 1);
ooParams[0].Name  := 'ToPoint';
ooParams[0].Value := sRange;
execDispatch('.uno:GoToCell', ooParams);

ooParams := CreateUnoStruct('com.sun.star.beans.PropertyValue', 1);
ooParams[0].Name  := 'HorizontalJustification';
ooParams[0].Value := 'com.sun.star.table.CellHoriJustify.CENTER';
execDispatch('.uno:HorizontalJustification', ooParams);

누군가가 왜 안되는가? 감사합니다 광고

Answer 1

수평 조정에는 열거가 필요한 것 같습니다. 그러나 당신은 문자열을 제공합니다. 당신은의 가치를 조회해야합니다 com.sun.star.table.CellHoriJustify.CENTER 그리고 당신의 ooParams[0].Value 그것으로.

열거를 조회하는 방법은 다음과 같습니다. http://www.oooforum.org/forum/viewtopic.phtml?t=16383

당신의 경우 com.sun.star.table.CellHoriJustify.CENTER 2와 같으므로 필요합니다.

ooParams[0].Name  := 'HorizontalJustification';
ooParams[0].Value := 2;