Сомневаюсь я что это программа косячная.
Пошаговая инструкция так сказать:
1. Запускаешь Delphi.
2. File - New - VCL Forms Application
3. На форму перетаскиваешь 1хTButton, 1xTEdit
4. В Edit1 очищаешь свойство Text
5. Делаешь двойной клик на Button1
5. В процедуре перед begin но после procedure TForm1.Button1Click.....
объявляешь переменные.
6. После слова begin вставляешь сам код.
7. Нажимаешь F9.
8. Радуешься.
|