Несколько потоков

[Adm]

Сообщение от mihali4

А как же вы хотите их использовать в Unit4, если сами спрятали их от нее ?

В Unit4 я создаю класс TTh, в Unit1 - прописываю Uses Uni4 и создаю объекты типа TTh. Используются эти объекты (в данном случае - потоки команд) только в Unit1. Компилируется программа нормально, так что с областями видимости проблем нет.

[mihali4]

Сообщение от Adm

Компилируется программа нормально, так что с областями видимости проблем нет.

А вот это уж дудки !
У вас двойное объявление Classes:

uses
Classes;

type
TTh = class(TThread)
private
procedure Work;
procedure Start;
procedure Stop;
{ Private declarations }
public
constructor Create(Var1: String; Var2: integer);
protected
procedure Execute; override;
end;

implementation

Uses Unit1,Classes;

Уже за это компилятор должен показать "желтую карточку".
Перенесите хотя бы Unit1 наверх...
Вообще, какой-то замысловатый способ - "из Новосибирска во Владивосток через Калининград"

[Adm]

Сообщение от mihali4

А вот это уж дудки !
У вас двойное объявление Classes:
Уже за это компилятор должен показать "желтую карточку".

Согласен. Но это я здесь так накосячил - часть писал руками, часть из среды копировал, вот и вышел бардак. В общем, компилируется нормально, это факт. А вот при работе - глючит...

[Adm]

Сообщение от mihali4

Вообще, какой-то замысловатый способ - "из Новосибирска во Владивосток через Калининград"

Вот бы и научили, как НАДО!