- 01
- 02
- 03
- 04
- 05
- 06
- 07
- 08
- 09
- 10
- 11
- 12
- 13
- 14
- 15
- 16
- 17
/// До этой строчки еще больше 1000 строк кода (И это всё в ОДНОЙ процедур)
finally
if Main.RecordCount > 0
then Main.First;
Main.EnableControls;
Panel2.Color:=clLime;
lbTimeSpend.Caption:='Âðåìÿ çàòðà÷åíî:'+TimeToStr(time()-TimeWork);
end;
Exit;
try
if TmpCollect_Skd.IsSelectAll then
begin
Askd_count := TmpCollect_Skd.RxDBGrid1.DataSource.DataSet.RecordCount;
end
/// После этой строки еще более 1000 строк кода всё в этой же процедуре!
Продолжим. Вот так люди используют Exit;
guest 28.04.2010 17:09 # +1
Слабо было написать так? :
//код...
Exit;
//никогда не выполняющийся код...
guest 28.04.2010 17:16 # 0
murz 28.04.2010 17:18 # +2
guest 28.04.2010 17:23 # 0
murz 28.04.2010 17:48 # 0
turdman 28.04.2010 17:25 # 0
guest 28.04.2010 21:01 # +2
guest 28.04.2010 18:08 # −12
guest 28.04.2010 20:37 # 0
guest 28.04.2010 21:01 # +2
guest 28.04.2010 23:13 # −1
guest 28.04.2010 23:44 # −1
guest 28.04.2010 23:49 # −1
guest 28.04.2010 23:49 # −1
guest 29.04.2010 15:43 # −2
guest 29.04.2010 15:46 # 0
mrbig66 29.04.2010 16:06 # +1
guest 29.04.2010 16:11 # 0
mrbig66 29.04.2010 16:13 # +1
guest 29.04.2010 16:06 # −1
guest 29.04.2010 17:20 # −1
guest 21.05.2010 11:01 # 0
guest 28.04.2010 23:49 # −1
guest 29.04.2010 01:53 # +1
Именем Âðåìÿ çàòðà÷åíî: объявляю говнокод удачным!
murz 29.04.2010 07:04 # 0
guest 29.04.2010 08:46 # +2
- из продукции броланда (цбуилдер, делфы) во всё, что угодно, кроме продукции броланда русский текст вставляется вот таким образом.
- из продукции броланда и софта, написанного на продукции броланда в аналогичные им продукты вставляется просто зашибись.
В этом случае автор при копировании открыл окно с дельфёй, а магии не делал.
Если нужно вставить из продукции броланда в приличное приложение, нужно выполнить следующие магические действия:
- переключить раскладку в окне на "русский";
- скопировать из нужного окна нужный текст, выделив его;
- можно безопасно вставлять в любое приложение, кодировка верная.
Инфа 100%, я гарантирую это как цбуилдерник со стажем.
murz 29.04.2010 09:54 # 0
Но это встречается не только в продукции борланда. Например, есть такая программка Homesite для верстки сайтов, при копирование русского текста, например, в ворд наблюдается точно такой же глюк
guest 29.04.2010 11:09 # 0
Macromedia Homesite 5.5, что подвернулась под руку:
Borland Delphi 4.0 - 5.0
cfdev 29.04.2010 19:06 # 0
а я знал, что в борланде говнокодеры сидят
guest 04.05.2010 16:24 # 0
Просто, когда выполняется копирование в клипборд из неюникодных приложений, то происходит автоматическая перекодировка в юникод, причем кодовая страница выбирается по текущей включенной раскладке для окна из которого происходит копирование. Обратное происходит еще интереснее... Но в этом нет сиплюсплюса, потому всемпох...
guest 05.05.2010 18:56 # 0
guest 31.05.2010 20:36 # 0
var
s: string;
begin
s := 'редиска';
end;
end.
Может быть давайте обсудим еще почему в TPfW не было поддержки юникода?
guest 03.05.2010 10:55 # +1
fixed
ganja_boy 04.05.2010 15:22 # 0
guest 04.05.2010 16:29 # 0
Лучше бы обернули в {$IFDEF NOT_DEFINED}/{$ENDIF}, а еще лучше юзать системы контроля версий и вытирать атавизмы из исходников без боязни невозвращения
guest 18.05.2010 22:17 # −1
с Exit просто косяк.
А вообще, говнокод должен быть краток, суров, безжалостен и беспощаден.