Здравствуйте! Помогите пожалуйста переделать макрос под делфи.
[vba]Код
Sub addSignature()
Dim signtr As Office.Signature
Application.ScreenUpdating = False
SendKeys "{ENTER}", False
Set signtr = ActiveDocument.Signatures.AddSignatureLine
Selection.EndKey Unit:=wdStory
Selection.ParagraphFormat.Alignment = wdAlignParagraphRight
With signtr.Setup
.SuggestedSigner = "****"
.SuggestedSignerLine2 = "****"
.SuggestedSignerEmail = "email@email.ru"
End With
Application.ScreenUpdating = True
End Sub
[/vba]
[moder]Может Вам все-таки форумы по Делфи поискать?[/moder]