- 1
dmauto.tout.FieldByName('nomer').AsString:= inttostr(inc(strtoint(dmauto.tout.FieldByName('nomer').AsString)));
Нашли или выдавили из себя код, который нельзя назвать нормальным, на который без улыбки не взглянешь? Не торопитесь его удалять или рефакторить, — запостите его на говнокод.ру, посмеёмся вместе!
+98
dmauto.tout.FieldByName('nomer').AsString:= inttostr(inc(strtoint(dmauto.tout.FieldByName('nomer').AsString)));
−105
''' <summary>
''' Функция взятия запроса как инструкции t/sql; рекордсет возвращается в виде oZap(,).
''' </summary>
''' <param name="eConnectString">Строка подключения к БД из списка.</param>
''' <param name="sText">Инструкция t/sql.</param>
''' <param name="oErr">Необязательная ошибка.</param>
''' <param name="oZap">Необязательный двумерный массив, содержащий рекордсет ― 1-ю таблицу датасета.</param>
''' <param name="iTimeout">Необязательное число секунд таймаута запроса.</param>
''' <returns>Число затронутых строк в таблице БД; если ноль, то нормально ещё, а если -1, то запрос не прошёл, если -2, то соединение не установилось.</returns>
''' <remarks>
''' </remarks>
''' <history>
''' [Max Pro] 11.04.2007 Created
''' [Max Pro] 08.08.2008 Реабилитировал OleDb.
''' [Max Pro] 08.04.2009 Оптимизировал как надо ReDim Preserve и переполнение Integer.
''' [Max Pro] 27.08.2009 Исправил ошибку ReDim Preserve ― было больше на 1 элемент.
''' </history>
''' -----------------------------------------------------------------------------
Public Function iZap(ByVal eConnectString As ConnectString, ByVal sText As String, Optional ByRef oErr As Exception = Nothing, Optional ByRef oZap(,) As Object = Nothing, Optional ByVal iTimeout As Integer = -1) As Integer
'#region "var"
Dim iX As Integer
Dim lY As Long
Dim lYTemp As Long
Dim i As Integer
Dim iZapTemp As Integer
'var zap
Dim sConnectString As String = sConStrFromEnum(eConnectString)
Dim oConnection
Dim oCommand
Dim oReader
'#end region 'var
'#region ini
If sConnectString Like "*sqloledb*" Then
oConnection = New OleDbConnection
oCommand = New OleDbCommand
Else
oConnection = New SqlConnection
oCommand = New SqlCommand
End If
'#end region 'ini
iZap = -2
oErr = New Exception
oConnection.ConnectionString = sConnectString
Try
'попытка открытия соединения
oConnection.Open()
If oConnection.State Then iZap = -1 'if <>0
'присвоение параметров команды
If iTimeout >= 0 Then oCommand.CommandTimeout = iTimeout
oCommand.CommandType = CommandType.Text
oCommand.Connection = oConnection
oCommand.CommandText = sText
'попытка выполнения команды
oReader = oCommand.ExecuteReader()
iZap = 0
iX = oReader.FieldCount - 1
lY = -1
lYTemp = 255
ReDim oZap(iX, lYTemp)
While oReader.Read()
lY += 1
If lY < Integer.MaxValue Then '2 147 483 647-1(заменил <= на < чтобы число элементов iZap не зашкалило).
iZapTemp = lY + 1
If lY > lYTemp Then
lYTemp += 256
ReDim Preserve oZap(iX, lYTemp)
End If
For i = 0 To iX
If IsDBNull(oReader(i)) Then oZap(i, lY) = Nothing Else oZap(i, lY) = oReader(i)
Next i
End If
End While
oReader.Close()
oReader = Nothing
oCommand = Nothing
iZap = iZapTemp
ReDim Preserve oZap(iX, iZapTemp - 1)
If lY >= Integer.MaxValue Then
oErr = New Exception(lY.ToString("# ##0") & " строк >=" & Integer.MaxValue & " (Integer.MaxValue), но массив заполнен до предела Int32 и iZap=Integer.MaxValue.")
End If
Catch oError As Exception
oErr = oError
Finally
If IsNothing(oConnection) = False Then
oConnection.Close()
oConnection = Nothing
End If
End Try
End Function 'iZap
А так Максим Прохоров выполняет запросы. слабо?
+908
template <typename Handler>
void start_connect_op(socket_type descriptor,
per_descriptor_data&, Handler handler)
{
boost::asio::detail::mutex::scoped_lock lock(mutex_);
if (!shutdown_)
{
boost::shared_ptr<bool> completed(new bool(false));
connect_handler_wrapper<Handler> wrapped_handler(
descriptor, completed, *this, handler);
bool interrupt = write_op_queue_.enqueue_operation(
descriptor, wrapped_handler);
interrupt = except_op_queue_.enqueue_operation(
descriptor, wrapped_handler) || interrupt;
if (interrupt)
interrupter_.interrupt();
}
}
Как дико зафрагментировать кучу?!
Столько хороших идей и так много говнокода в реализации.
//boost::shared_ptr<bool> completed(new bool(false)); - это один из шедевров кривокодирования!!!
+84
public void setPhones(List<PhoneNumber> phones) throws Exception {
this.phones = phones;
this.phones.clear();
this.phones.addAll(phones);
}
Вот такой метод нашёл сегодня в коде.
+57.2
t1->addAnimation(new QPropertyAnimation(widget, "geometry"));
t1->addAnimation(new QPropertyAnimation(p1, "pos"));
t1->addAnimation(new QPropertyAnimation(p2, "pos"));
t1->addAnimation(new QPropertyAnimation(p3, "pos"));
t1->addAnimation(new QPropertyAnimation(p4, "pos"));
t1->addAnimation(new QPropertyAnimation(p5, "pos"));
t1->addAnimation(new QPropertyAnimation(p6, "pos"));
t1->addAnimation(new QPropertyAnimation(p1, "rotation"));
t1->addAnimation(new QPropertyAnimation(p2, "rotation"));
t1->addAnimation(new QPropertyAnimation(p3, "rotation"));
t1->addAnimation(new QPropertyAnimation(p4, "rotation"));
t1->addAnimation(new QPropertyAnimation(p5, "rotation"));
t1->addAnimation(new QPropertyAnimation(p6, "rotation"));
t1->addAnimation(new QPropertyAnimation(p1, "opacity"));
t1->addAnimation(new QPropertyAnimation(p2, "opacity"));
t1->addAnimation(new QPropertyAnimation(p3, "opacity"));
t1->addAnimation(new QPropertyAnimation(p4, "opacity"));
t1->addAnimation(new QPropertyAnimation(p5, "opacity"));
t1->addAnimation(new QPropertyAnimation(p6, "opacity"));
QAbstractTransition *t2 = state2->addTransition(button, SIGNAL(clicked()), state3);
t2->addAnimation(new QPropertyAnimation(box, "geometry"));
t2->addAnimation(new QPropertyAnimation(widget, "geometry"));
t2->addAnimation(new QPropertyAnimation(p1, "pos"));
t2->addAnimation(new QPropertyAnimation(p2, "pos"));
t2->addAnimation(new QPropertyAnimation(p3, "pos"));
t2->addAnimation(new QPropertyAnimation(p4, "pos"));
t2->addAnimation(new QPropertyAnimation(p5, "pos"));
t2->addAnimation(new QPropertyAnimation(p6, "pos"));
t2->addAnimation(new QPropertyAnimation(p1, "rotation"));
t2->addAnimation(new QPropertyAnimation(p2, "rotation"));
t2->addAnimation(new QPropertyAnimation(p3, "rotation"));
t2->addAnimation(new QPropertyAnimation(p4, "rotation"));
t2->addAnimation(new QPropertyAnimation(p5, "rotation"));
t2->addAnimation(new QPropertyAnimation(p6, "rotation"));
t2->addAnimation(new QPropertyAnimation(p1, "opacity"));
t2->addAnimation(new QPropertyAnimation(p2, "opacity"));
t2->addAnimation(new QPropertyAnimation(p3, "opacity"));
t2->addAnimation(new QPropertyAnimation(p4, "opacity"));
t2->addAnimation(new QPropertyAnimation(p5, "opacity"));
t2->addAnimation(new QPropertyAnimation(p6, "opacity"));
QAbstractTransition *t3 = state3->addTransition(button, SIGNAL(clicked()), state1);
t3->addAnimation(new QPropertyAnimation(box, "geometry"));
t3->addAnimation(new QPropertyAnimation(widget, "geometry"));
t3->addAnimation(new QPropertyAnimation(p1, "pos"));
t3->addAnimation(new QPropertyAnimation(p2, "pos"));
t3->addAnimation(new QPropertyAnimation(p3, "pos"));
t3->addAnimation(new QPropertyAnimation(p4, "pos"));
t3->addAnimation(new QPropertyAnimation(p5, "pos"));
t3->addAnimation(new QPropertyAnimation(p6, "pos"));
t3->addAnimation(new QPropertyAnimation(p1, "rotation"));
t3->addAnimation(new QPropertyAnimation(p2, "rotation"));
t3->addAnimation(new QPropertyAnimation(p3, "rotation"));
t3->addAnimation(new QPropertyAnimation(p4, "rotation"));
t3->addAnimation(new QPropertyAnimation(p5, "rotation"));
t3->addAnimation(new QPropertyAnimation(p6, "rotation"));
t3->addAnimation(new QPropertyAnimation(p1, "opacity"));
t3->addAnimation(new QPropertyAnimation(p2, "opacity"));
t3->addAnimation(new QPropertyAnimation(p3, "opacity"));
t3->addAnimation(new QPropertyAnimation(p4, "opacity"));
t3->addAnimation(new QPropertyAnimation(p5, "opacity"));
t3->addAnimation(new QPropertyAnimation(p6, "opacity"));
http://qt.gitorious.org/qt/qt/blobs/4.7/examples/animation/states/main.cpp
Пример использования Qt animation framework: образцовый быдлокод.
+143.8
foreach ($invoises as $invoiceId => $invoice) {
Вот так и работаем с инвойсами...
+126
try
{
....
com.ExecuteNonQuery();
}
catch (Exception ex) { }
finally
{
con.Close();
}
ASP.NET
Вот так вот обрабатываем ошибки, за которые получаем ПИЗДЫ.
Интересно а откуда ж нам об них узнатьтаа :)))
+121.8
int lvl = Convert.ToInt32(reader[0].ToString());
ASP.NET
Из текста это получается лучше сделать
reader = SqlDataReader
+120
foreach(char Enter in Environment.NewLine)
this.Add(Enter);
+146.4
$where = $this->getAdapter()->quoteInto('idUser=?', (int)$this->idUser);
надёжная защита от инъекций )))