Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Delphi + новая компонента = НЕРАБОТАЕТ delphi [D6, D7, Win95/98, WinXP]


Kolan ©   (2004-10-01 15:28:00) 

Здравствуйте,
устанавливаю компонент-все в порядке. Пытаюсь что лобо сделать не работает как буд-то строчки которую я написал нет. Ни присваиваются переменные ни циклы не работают. Причем программы написанные до установки компоненты работают и компилируются нормально, но если в них вставить новый код его просто компилятор пропускает.
Переустановка помогает но компонент та нужен????????????


Kolan   (2004-10-01 16:12:00) [1]

Всем спасибо


Ega23   (2004-10-01 16:04:00) [2]

Опитмизацию отключи. как?

Project -> Options -> Compiler -> Code Generation -> Optimisation.Checked:=False;


Kolan   (2004-10-01 16:03:00) [3]

Сам нашел где спасибо. А я вчера с психу delphi переставил. Не устанавливал я компоненты некогда. :)))


Kolan   (2004-10-01 16:01:00) [4]

Товаришь Мастер ©  разрешите доложить: Все работает.
PS Опитмизацию отключи. как?


Мастер   (2004-10-01 15:53:00) [5]

Kolan ©   (01.10.04 15:48) [3]
Проделай все то же самое, но измени код так:


procedure TForm1.Button1Click(Sender: TObject);
var i, k:integer;
begin
  k:=0;
  for i:=1 to 10 do
  begin
    k:=k+1;
    ShowMEssage(IntToStr(k)+':'+IntToStr(i));
  end;
end;


О результатах доложи.


Тестировщица   (2004-10-01 15:53:00) [6]

Опитмизацию отключи


Ega23   (2004-10-01 15:51:00) [7]

Kolan ©   (01.10.04 15:48) [3]

Оптимизацию отключи.


Kolan   (2004-10-01 15:49:00) [8]


> Семен Сорокин ©   (01.10.04 15:47) [2]
> наверное ошибка в компоненте

Два разных пробовал. Отдельно.


Kolan   (2004-10-01 15:48:00) [9]

Смотри установил компонент так. Допустим кидаю кнопку и пишу:

procedure TForm1.Button1Click(Sender: TObject);
var i, k:integer;
begin
k:=0;
for i:=1 to 10 do
 k:=k+1;
end;

Проше не придумаешь. Жму F7 ичто я вижу на k:=0; вообше не переходит, а сразу на for i:=1 to 10 do дальше никакой цикл не работает, а сразу end;
Вот и всё


Семен Сорокин   (2004-10-01 15:47:00) [10]

наверное ошибка в компоненте


Гаврила   (2004-10-01 15:41:00) [11]

Kolan ©   (01.10.04 15:28)

ничего не понял


Наверх

Титульная страница Поиск, карта сайта Написать письмо