1. Pascal / Говнокод #7698

    +105

    1. 01
    2. 02
    3. 03
    4. 04
    5. 05
    6. 06
    7. 07
    8. 08
    9. 09
    10. 10
    11. 11
    12. 12
    13. 13
    14. 14
    procedure TForm2.FormCreate(Sender: TObject);
begin
  SpeedButton1.Left := Form2.ClientWidth div 2 - SpeedButton1.Width;
  SpeedButton1.Top := Form2.ClientHeight div 2 - SpeedButton1.Height;
 
  SpeedButton2.Left := Form2.ClientWidth div 2;
  SpeedButton2.Top := Form2.ClientHeight div 2 - SpeedButton2.Height;
 
  SpeedButton3.Left := Form2.ClientWidth div 2 - SpeedButton3.Width;
  SpeedButton3.Top := Form2.ClientHeight div 2;
 
  SpeedButton4.Left := Form2.ClientWidth div 2;
  SpeedButton4.Top := Form2.ClientHeight div 2;
end;

    Запостил: Fai, 30 Августа 2011

    Комментарии (13) RSS

    • ava roman-kashitsyn 30.08.2011 15:02 # +4

      BicycleLayoutManager (tm)
      Ответить

      • ava 3.14159265 30.08.2011 16:21 # 0

        Каюсь, сам такое очень много раз писал.
        С другой стороны для win32-приложения на 10-15 минут с 3 контролами тянуть отдельную либу для выравнивания - излишество.
        >Form2
        либо оно ваялось на скорую руку. либо стандартное говно.
        Ответить

        • ava roman-kashitsyn 30.08.2011 16:28 # 0

          а мне нравится для приложений на 10-15 минут использовать CLI
          Ответить

          • ava 3.14159265 30.08.2011 19:53 # 0

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

      • ava TheHamstertamer 30.08.2011 17:15 # +3

        >TBicycleLayoutManager
        fxd
        Ответить

    • ava RaZeR 31.08.2011 14:39 # +1

      SpeedButton1, SpeedButton2... SpeedButton100500
      Почему конструкторы форм мышкой не спрашивают имя создающегося элемента? От этих ТButton100500 уже глаза болят.
      Ответить

      • ava Fai 31.08.2011 17:52 # +4

        Быдлокодеры задолбаются придумывать названия и эти среды потеряют 85% целевой аудитории.
        Ответить

      • ava TheHamstertamer 31.08.2011 19:24 # +3

        не надо их спрашивать, а то будет Knopko1, Spisok3 и т.д.
        Ответить

      • ava ctm 01.09.2011 07:59 # +1

        потому что это неудобно.
        лично я сначала накидываю основные контролы, чтобы понять сразу нормально ли выглядит, а потом все нормально именую и расставляю нужные свойства типа алигнов, кепшонов и т.п.
        Ответить

      • ava Y_F 09.01.2012 12:07 # −2

        потому, что далеко не всем компонентам нужны осмысленные имена.
        Например, для TLabel имя как правило не нужно (если нет обращений в коде)
        Ответить

    • ava ctm 01.09.2011 07:56 # 0

      Скорее всего, у каждого в первом проекте было подобное, если, конечно, не пнули во-время.
      у меня было так:( но только в 1 (самом первом) проекте.
      Тестовые проекты на 5 минут не считаются:)
      Ответить

      • ava Fai 01.09.2011 09:49 # +1

        У меня штуки 3-4 но мелкие, так что запутываться было не в чем.
        Что-то крупное писать конечно надо именовать объекты нормально, а тестовую программу можно и так слепить.
        Ну а интерфейс мне нравится клепать в Microsoft Visio.
        Ответить

    Добавить комментарий