Помогите разобраться с Delphi

[Uli9]

Хм..понятно. Но выравнивание по-моему это совсем лишнее на фоне всей проблемы.Спасибо за исправления большое!!Извинения мне не нужны.У меня вопрос?почему вы из Unita2 все перенесли в Unit1?мне так не надо.Тот алгоритм должен быть в Unit2.
И почему тогда из Unit3 не перенесли так же?

[Dj_smart]

Это было сделано потому что все процедуры были явно из первого модуля и носили отчество TForm1. Я думаю это не так уж и важно, но можно перенести обратно, дав им отчество Unit1. (Если не ошибаюсь). Разкидал на 2 юнита.

[Uli9]

Большое спасибо!Очень спасаете.У меня ещё вопрос(извини пожалуйста за беспокойство).Вот смотрите в первом Unit1 у меня есть такая процедура.

procedure TForm1.btnGoClick(Sender: TObject); // Запуск расчета и вывод результатов -сборка

begin
towncount := lbTowns.Items.Count;
GetWeightsMatrix; // перебрасываем пути в матрицу
FirstCountStep; // инициализируем расчет
GoCount; // запускаем расчет
ShowResults; // результаты - в мемо

Это процедура(нажимаем кнопку "Рассчитать кратчайшие пути").Как видите в ней подключены процедуры, которые созданы для расчета как раз.Но мне ведь нужно и две другие кнопки так же прописать ("Расстояние между двумя городами" и "Расстояние через промежуточный город").Я думаю Вы понимаете меня. Эти кнопки тоже будут определятся в Unit1.Но процедуры расчета у меня описаны в Unit2 и Unit3 соответственно(как Вы тоже уже видели неоднократно).Как мне тогда подключить их в этих кнопках,если они в других юнитах?Надеюсь понятно объяснила=)