Box1-> ItemIndex == 8)
} (ListBox1-> ItemIndex == 9)
} (ListBox1-> ItemIndex == 10)
} (ListBox1-> ItemIndex == 11)
} (ListBox1-> ItemIndex == 12)
}
}
{-> DragMode = dmAutomatic; (RichEdit1-> Handle, WM_VSCROLL, MAKEWPARAM (SB_THUMBPOSITION, 50), 0);
}
{-> Clear (); -> Hide (); -> Close (); -> Show ();
}
{-> Close ();
}
ListBox1-> Items-> Add ("sbrk");
}
// ---------------------------------------- -----------------------------------