Работа с кодом в Delphi
Дан код .
with TBubbleSort.Create(BubbleSortBox, BubbleSortArray, label4) do
OnTerminate := ThreadDone;
with TSelectionSort.Create(SelectionSortBox, SelectionSortArray, label5) do
OnTerminate := ThreadDone;
with TQuickSort.Create(QuickSortBox, QuickSortArray, label6) do
OnTerminate := ThreadDone;
Нужно сделать так,чтобы работало без with....do, нужно заменить его другим...это связано с create .
Дан код .
with TBubbleSort.Create(BubbleSortBox, BubbleSortArray, label4) do
OnTerminate := ThreadDone;
with TSelectionSort.Create(SelectionSortBox, SelectionSortArray, label5) do
OnTerminate := ThreadDone;
with TQuickSort.Create(QuickSortBox, QuickSortArray, label6) do
OnTerminate := ThreadDone;
Нужно сделать так,чтобы работало без with....do, нужно заменить его другим...это связано с create .