Как использовать класс делфи

Судя по всему версия делфи должна быть не ниже 2009.
 
не очень понятно, что конкретно спрашиваешь, мало инфы - что есть, но попробую помочь
1. в uses добавляешь свой unit с классом
2. делаешь вызов своей процедуры например по нажатию кнопочки:)
Код:
procedure TForm1.BitBtn1Click(Sender: TObject);
var
  m1t: T_твой_класс;
begin
  m1t := T_твой_класс.Create(Self); //создали объект
  m1t.GO; // Запустили процедуру
  m1t.Free; //Удалились
end;

Не по фэн-шую, надо бы:
Код:
procedure TForm1.BitBtn1Click(Sender: TObject);
var
  m1t: T_твой_класс;
begin
  m1t := T_твой_класс.Create(Self); //создали объект
  try
    m1t.GO; // Запустили процедуру
  finally
    m1t.Free; //Удалились
  end;
end;
 
блин компилятор ругается на строчку XMLRequest:=TStringStream.Create('<?xml version="1.0"?>'+XML,CP_UTF8); кто-то может попробовать у себя работоспособность этого кода, может это из-за того что у меня делфи 6
На 6-м работать не будет. Самый нормальный делфи - 7й или "Delphi 10 Lite v3.0"
 
Напишите текст ошибки(с пометкой 'Error') в комментарий, и после этого будет разбираться)
-----------------
XMLRequest:=TStringStream.Create('<?xml version="1.0"?>'+XML,CP_UTF8);
Попробуй скомпилировать без "CP_UTF8"
 
Назад
Сверху