|
|
Регистрация Восстановить пароль |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
|
Опции темы | Поиск в этой теме |
13.08.2012, 17:48 | #1 |
Пользователь
Регистрация: 26.12.2011
Сообщений: 78
|
программа держится на экране сикунду и пропадает
после использывания цикла repeat программа перестала работать запускается и сразу же сама закрывается. Я удалил уже этот цикл взял в коментарий весь код программы (оставил только то что делфи создает сам при начале работы). Не помогает. Подскажите кто знает в чем причина, а то я над прогой три дня сидел, обидно есле так не заработает. Про то, что надо сохроняться знаю, но проблема в том, что я сохранил программу перед компиляцией и сохранение теперь тоже не работает. Спасайте.
|
13.08.2012, 17:51 | #2 |
Пользователь
Регистрация: 10.08.2012
Сообщений: 84
|
А код можно посмотреть
|
13.08.2012, 17:52 | #3 |
Старожил
Регистрация: 04.02.2009
Сообщений: 17,351
|
Попробуйте создать пустой проект и весь код перенести туда (через буфер обмена).
Маньяк-самоучка
Utkin появился в результате деления на нуль. Осторожно! Альтернативная логика |
13.08.2012, 17:52 | #4 |
Пользователь
Регистрация: 26.12.2011
Сообщений: 78
|
извиняюсь за ошибку в заголовке
код к сожелению скинуть не могу т.к сижу в инете через телефон, а он с компом не синхронизируетса. Последний раз редактировалось Stilet; 14.08.2012 в 11:31. |
13.08.2012, 18:04 | #5 |
Пользователь
Регистрация: 10.08.2012
Сообщений: 84
|
Оконная программа с минимумом кода в трёх файлах.
Файл проекта program Project1; uses Forms, Unit1 in 'Unit1.pas' {Form1}; {$R *.res} begin Application.Initialize; Application.CreateForm(TForm1, Form1); Application.Run; end. Файл модуля 1 unit Unit1; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs; type TForm1 = class(TForm) private { Private declarations } public { Public declarations } end; var Form1: TForm1; implementation {$R *.dfm} end. Файл DFM - ваша форма object Form1: TForm1 Left = 192 Top = 140 Width = 870 Height = 500 Caption = 'Form1' Color = clBtnFace Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] OldCreateOrder = False PixelsPerInch = 96 TextHeight = 13 end Вот и всё это должно работать, а остальное закомментить {} Последний раз редактировалось DelhiProgramer; 13.08.2012 в 18:04. Причина: Извините за очень большое сообщение |
13.08.2012, 18:27 | #6 |
Пользователь
Регистрация: 26.12.2011
Сообщений: 78
|
не удалил все лишнее. Теперь в окне там где program Project1;
uses Forms, Unit1 in 'Unit1.pas' {Form1}; {$R *.res} begin Application.Initialize; Application.CreateForm(TForm1, Form1); Application.Run; end. Выбивает ошибку и подсвечивает begin |
13.08.2012, 19:10 | #7 |
Старожил
Регистрация: 28.01.2009
Сообщений: 21,000
|
какую ошибку?
Хорошо поставленный вопрос это уже половина ответа. | Каков вопрос, таков ответ.
Программа делает то что написал программист, а не то что он хотел. Функции/утилиты ждут в параметрах то что им надо, а не то что вы хотите. |
14.08.2012, 10:53 | #8 |
Пользователь
Регистрация: 10.08.2012
Сообщений: 84
|
Если ошибка не входит в основной блок программы, то проблема с юниотм 1
|
Похожие темы | ||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
Пропадает statusStrip | GApe | C# (си шарп) | 0 | 03.01.2012 01:20 |
На каких языках веб програмирования держится фейсбук? | vadimparavoz | Помощь студентам | 1 | 03.11.2011 04:20 |
пропадает интернет! | Серёга0629 | Софт | 22 | 23.09.2011 10:56 |
Программа не держится на экране | Anubys | Общие вопросы C/C++ | 3 | 09.11.2010 01:59 |