Здравствуйте Аноним, Вы писали:

А>Здравствуйте Sinclair, Вы писали:

А>А что такое TXForm ?
А>Дерево и в правду выдается либо маленьким , либо не все печатается.
А>Вы первый человек , который хоть что-то сообщил бедной замученной данным
А>вопросом девушке.

А вы какую версию Дельфи пользуете? Если выше 4й,то просто нажимаете кнопку Ctrl и кликаете идентификатор, который вам непонятен. Дельфи приведет вас вот к этому:

unit Windows;
//Skipped
type
  PXForm = ^TXForm;
  {$EXTERNALSYM tagXFORM}
  tagXFORM = packed record
    eM11: Single;
    eM12: Single;
    eM21: Single;
    eM22: Single;
    eDx: Single;
    eDy: Single;
  end;
  TXForm = tagXFORM;
  {$EXTERNALSYM XFORM}
  XFORM = tagXFORM;
//skipped

Теперь, увидев, что тип определен в модуле Windows, можно смело лезть в MSDN. Ясно, что буква T добавлена для соблюдения именования (ясно это по наличию tagXFORM, XFORM, и PXorm). Ищем XFORM. Первый же топик в списке все нам расскажет. Заодно можно глянуть там же функцию SetWorldTransform
Кстати, у вас код-то заработал? Или вы теоретически спрашиваете?