Особенно АСМ!

Максим но ведь ты показал ему этим, что тебе не интересно и что ты умнее его, разве не так?

DieHard
Я ему не показывал, что я его умнее! Я просто показывал, что я не выспался!

на всех его уроках?

А это зависит от того, как препод себя поставит...

А здесь, кстати, бывают приятные исключения. У меня в техникуме был например договор с преподом по АСМу, что я прихожу только на контрольные. И так до первой контрольной с ошибкой.

DieHard
Нет, сначала сидел нормально, а потом скучно стало! Ему особенно не понравилось, когда я ему принес код моего тогда второго архиватора

WhPh
У меня такой договор был с преподавательницей по Пасу, а с тем хрычом - пришлось приходить всегда и всегда сидеть рядом с дверью!
Мне правда потом просто все надоело, сходил к директору и ему сразу сдал все по Асму, от него получил задание на курсовой, ему его и защитил!

Максим показывал-показывал, и здесь это делаешь. ведь не только препод это заметил, DieHard совершенно верно сказал. но не в этом дело у меня (да наверное у всех) тоже были подобные ситуации. я писал прогу, компилял, запускал, преподша увидела (а их несколько) и сказала чтобы я больше не запускал чужие проги. потом все выяснилось, и я от занятий по программ. был освобожден. сдал курсовую, диплом и все. после окончания мне сказали что я был только вторым человеком с такими способностями. , но программистом я так и не стал работать. такая вот судьба.

WhPh Согласен.
Я должен был помогать отсталым на занятиях и тогда мне 5 автоматом.

11 твоя судьба в твоих руках и ты ее можешь изменить !

Максим началство всегда поможет, если ОНО понимает

11 DieHard
Дык и я сейчас могу отойти так сказать от призвания ....... сейчас я обычный оператор БД для заполнения контента в сайт

Максим а причем тут призвание?

DieHard Ну типа были люди, которые считали, что програмирование - енто мое призвание ....... но я сейчас ушел с призвания на деньги ...... дык вот так ........... сынка хочет кушать, а не хочет, чтобы папа был хорошим программером, но денег было в семье мало

-----

Попробуй объявить i глобальным.
(или в Паскале есть подобие С-шного static?)

AD[FX]
Скажем есть у тебя класс образованный от TForm ........ на форме одна кнопка и один Edit ...... в Edit выводиться информация из переменной

Вот тебе кусок кода:
-----
Type
TForm1 = Class(TForm)
Button1: TButton;
Edit1: TEdit;

Procedure Button1Click(Sender: TObject);
Proceduree FormCreate(Sender: TObject);
Private
I: Integer;
End;

----

Procedure TForm1.FormCreate(Sender: TObject);
Begin
I := 0;
Edit1.Text := '';
End;

Procedure TForm1.Button1Click(Sender: TObject);
Begin
Inc(I);
Edit1.Text := IntToStr(I);
End;
---

Ну вообщем примерно все так

Максим
Спасибо за консультацию, теперь понял.

AD[FX]
Да не за что! Обращайся еще ..... кстати I можно просто из класс вынести и объявить сразу после Implementation

И будет енто выглядеть примерно так:
Var
I: Integer = 0;

Но при условии, что разрешишь присваивание константам значений....... или же так, как в FormCreate сделано