Ветка Розыча о задачке?

← →
Пит (2013-12-18 11:00) [0]

Слушайте, ну точно вчера же была ветка от Rouse_ насчет задачки со ссылкой на его блог.

А теперь ветки нету, ну странно, она то чем не угодила, хотел почитать ответы еще)

← →
brother © (2013-12-18 12:25) [1]

http://delphimaster.net/view/15-1386177106/

← →
Пит (2013-12-18 12:47) [2]

Нее, там задачка была насчет найти ошибку в коде )

← →
Rouse__ (2013-12-18 21:10) [3]

Мих, я сам ее грохнул - я просто не ожидал такой скорости решения :)
Ну и чтоб не заспойлирели в блоге - просто прибил

← →
Пит (2013-12-18 21:11) [4]

аа, ясно. Ну тебе виднее )) Эту тоже можешь тогда того

← →
Rouse__ (2013-12-18 21:13) [5]

Но! В качестве возмещения, если конечно хотите, готов выдать нагора еще парочку аналогичных задач без их размещения в блоге :)

← →
asail © (2013-12-18 21:31) [6]

> Rouse__ (18.12.13 21:10) [3]
> Мих, я сам ее грохнул - я просто не ожидал такой скорости
> решения :)

Коллективный разум, чтоб его... :)

← →
asail © (2013-12-18 21:31) [7]

← →
Rouse__ (2013-12-18 21:48) [8]

В след раз я буду камуфлировать ошибку, ибо на это разум коллективный хрен каких примеров найдется :)

← →
asail © (2013-12-18 21:51) [9]

> Rouse__ (18.12.13 21:48) [8]
> В след раз я буду камуфлировать ошибку, ибо на это разум
> коллективный хрен каких примеров найдется :)

Одну, закамуфлированную я уже нашел - у тебя ник не правильный! :)

← →
Rouse__ (2013-12-18 21:53) [10]

У меня пароль страшный, с планшета не удобно перенабирать, а дельфиум куки чей-то не держит :)

← →
DVM © (2013-12-18 21:55) [11]

> Rouse__ (18.12.13 21:53) [10]
> У меня пароль страшный

Дай догадаюсь, имя набранное в английской раскладке нажатием на клавиши с русскими буквами? Это то, что с планшета не набрать :)

← →
Rouse__ (2013-12-18 22:06) [12]

Гуид :))

← →
Пит (2013-12-19 00:26) [13]

ну в задачке Розыча мне понравилось то, что я быстро её решил. Причем, через одно место, там речь была о Bool, который в явном виде указан в прототипе функции. А я его проглядел и увидел лишь, что функция StdCall, откуда предположил, что библиотека не дельфовая, а даже возможно Сишная, а значит может быть там используется Bool, вместо дельфового boolean, который туда передается ;)

А на остальные задачки было бы интересно посмотреть. Если бы еще и дельфи не умер (( А то вот получается знаешь эти тонкости, а хрен кому они нужны в реальном мире.

← →
Rouse__ (2013-12-19 00:30) [14]

Будут тебе задачки :))
Раз Дельфи умер - то тебе придется их решать на мертвом языке, добро пожаловать в историю :)))

← →
Пит (2013-12-19 00:37) [15]

не, в историю обычно посмертно попадают, я пока не готов...

← →
asail © (2013-12-19 02:35) [16]

> Пит (19.12.13 00:26) [13]

> Если бы еще и дельфи не умер ((

А у тебя дельфи умер? Соболезную. У меня пока живой... :)

← →
Rouse_ © (2013-12-19 23:24) [17]

С задачками чуть позже, приготовить их надо, а то большинство я их публиковал, а пока что ответ на первую :)
http://alexander-bagel.blogspot.ru/2013/12/1_19.html

← →
Германн © (2013-12-20 21:22) [18]

> Rouse_ © (19.12.13 23:24) [17]
>
> С задачками чуть позже, приготовить их надо, а то большинство
> я их публиковал, а пока что ответ на первую

Либо впрочем, ли в "Прочее". Но в "Прочее" нельзя увидеть "перекрытие штатной DLLEntryPoint..."

Из Кемерово с приветом. :)

← →
Rouse_ © (2013-12-20 22:06) [19]

Не придирайся - важен контент а не его подача :)

← →
Германн © (2013-12-20 22:15) [20]

> Rouse_ © (20.12.13 22:06) [19]
>
> Не придирайся - важен контент а не его подача :)
>

Не придирайся - мне больше нечем себя занять. :)

← →
Rouse_ © (2013-12-20 22:55) [21]

> Пит (19.12.13 00:26) [13]
> А на остальные задачки было бы интересно посмотреть

Решай :)
http://alexander-bagel.blogspot.ru/2013/12/2.html

← →
Пит (2013-12-20 23:24) [22]

нечего сказать. Я не вижу технологической разницы между выводом текста.

11) Выводится везде вроде одинаково:

>TextOut(ACanvas, Button1.Left, 20, PChar(AText), Length(AText));

2) В одном случае считывается Text, в другом случае Lines[0].

Понятно, что при CRLF результат будет разный. В первом случае считается весь текст в memo, во втором случае - до первого CRLF.

Но причем тут отображение или не отображение текста - не знаю. Просто текст будет разный

3) не понимаю, какая разница в какой порядке считывать:

сначала Canvas.Handle, а потом текст или наоборот.

Я без компьютера вообще предположения построить не могу даже.

← →
Пит (2013-12-20 23:27) [23]

Ну у меня есть какое-то скромное предположение, что TextOut как-то может хитро работать с выводом текста, в котором есть CRLF. Соответственно, в случае со считыванием Text в TextOut может оказаться перевод строки, в случае с Lines[0] символа перевода строки не может быть. Но что с того - вообще не знаю ))

← →
Пит (2013-12-20 23:29) [24]

ну и постановка вопроса странная:

1. Определить какой из вариантов кода правилен. 2. Объяснить причину такого поведения.

Если ты не знаешь причину (2), то как вообще можно определить какой вариант кода правильный (1), без компьютера.

> Пит (20.12.13 23:24) [22]
> нечего сказать. Я не вижу технологической разницы между
> выводом текста.

Это плохо.
Хотя нет - это не плохо, это действительно немного из серии углубленки, поэтому как в том анекдоте:
"Танк секретный - наука может и не знать"

Нет ничего удивительного что ты не видишь здесь разницы, впрочем как и много других прикладников, такие нюансы по сути не нужны в обычной разработке ПО (правда пока ты с ними не столкнешься) :)

> Если ты не знаешь причину (2), то как вообще можно определить
> какой вариант кода правильный (1), без компьютера.

Так я же сразу отписался - это задача из тестов на собеседовании.
Ответ подразумевается сам собой :)

А ведь зная Розыча стоило сразу обратить внимание на описание переменных.

← →
jack128_ (2013-12-21 00:42) [28]

> ну в задачке Розыча мне понравилось то, что я быстро её
> решил. Причем, через одно место

Реально - через одно место. Просто скомпилировать её не пробовал?? Там же код не компилируется. При нормальных настройках компилятора, конечно.

> Германн © (21.12.13 00:27) [27]
> А ведь зная Розыча стоило сразу обратить внимание на описание
> переменных.

Ты меня плохо знаешь, я мог бы изначально и PBoolean в декларации вместо PBool сделать (как в примерах из инета, ссылки на которые я дал), но это было-бы уже слишком сурово :)

> jack128_ (21.12.13 00:42) [28]

Дык :)
Впрочем, когда вся подноготная уже открыта - вещай, это действительно важный нюанс.

← →
Пит (2013-12-21 02:24) [30]

> Просто скомпилировать её не пробовал??

Нет конечно, все по чеснаку, никакой среды )

> Суть данного кода проста - берем текст, который содержится
> в Memo и тупо выводим его на канву формы.

Вам шашечки,
procedure TForm1.Button1Click(Sender: TObject); var ACanvas: THandle; AText: string; ARect: TRect; ADc :Hdc; begin ARect.Top := 20; ARect.Left := Button1.Left; ARect.Right := Width; ARect.Bottom := Height; AText := Memo1.Text; ADc := GetDc(Handle); // AFont := SelectObject(ADc , CreateFontIndirect(,,)) DrawText(ADc, PChar(AText), Length(AText), ARect, 0); // DeleteObject( SelectObject(ADc , AFont ); ReleaseDC(Handle, ADc); end;

или ехать!
procedure TForm1.Button1Click(Sender: TObject); begin Canvas.TextOut(Button1.Left, 20, Memo1.Text); end;

> Rouse_ © (21.12.13 00:50) [29]
>
>
> > Германн © (21.12.13 00:27) [27]
> > А ведь зная Розыча стоило сразу обратить внимание на описание
> > переменных.
>
> Ты меня плохо знаешь, я мог бы изначально и PBoolean в декларации
> вместо PBool сделать (как в примерах из инета, ссылки на
> которые я дал), но это было-бы уже слишком сурово :)
>

Зная тебя в любом случае в твоих примерах/задачах нужно начинать с нуля. Т.е. с описания переменных.

Мих, спешал фо ю, как грится, первую часть выложил ответа, попробуй ответить на вторую часть...
(Ну сам-же просил)
http://alexander-bagel.blogspot.ru/2013/12/2_23.html

"Я неправильно использовал систему, наступил на грабли и теперь с вами делюсь почему так делать нельзя" - в таком формате я понимаю подачу материала (как сделано в тексте последней приведенной ссылки).

Но в формате "задачи"?? т.е. узко выбираем того, кто ходил именно по нашим граблям.
В чем ценность такого человека, кроме теста на то, что он быстро вольётся именно в наш стиль работы и в нашу узкую специфику?

Ветка Розыча о задачке? Найти похожие ветки