- 1
- 2
- 3
- 4
- 5
procedure TEditor.cbReverseClick(Sender: TObject);
begin
T.Reversed := not T.Reversed;
Show;
end;
Нашли или выдавили из себя код, который нельзя назвать нормальным, на который без улыбки не взглянешь? Не торопитесь его удалять или рефакторить, — запостите его на говнокод.ру, посмеёмся вместе!
+95
procedure TEditor.cbReverseClick(Sender: TObject);
begin
T.Reversed := not T.Reversed;
Show;
end;
Вместо
T.Reversed := cbReverse.Checked;
Интересно, может ли это создать баг?
а баг может быть если неправильно присвоить начальное значение T.Reversed.
TEH R00T OMG!!!
В del_phi он называется по другому, а именно: TT
айфон девятого поколения имплантировали в мозг новорожденным
мир перешел на ipv6
в джаве появились кложуры
тарас писал на дельфи образца 1997го года
Это все равно, что ездить на ретроавтомобиле:
http://www.webpark.ru/comment/62916
Шарм и престиж. Или?
Я кстати на ТП-7 писал до недавнего времени.
http://makeyourmeme.ru/default/instance_6/197775/%D0%BC%D0%B5%D0%BC.jpg
а 640кб мне только на bus_race еле хватило, да и то, отладчик и среда уже не влезали в память, отлаживал чисто логами.
Не только, я же соу слоу, недавно на итхеппензе в рекламе проскакивало. А там из новшеств - дельфи новаяв новой упаковке.
- вызвать обработчик из другого обработчика
- еще какой-нибудь контрол влияет на reserved (меню например)
- при инициализации формы на простановке checked вызовется этот обработчик - учесть нужно