Результаты поиска по запросу "delphi"

2 ответа

Пример использования:

м интересном блогеdelphiXtreme [http://delphixtreme.com/wordpress/?page_id=2]Я читал о встроенных возможностях тестирования GUI в DUnit (в основном это альтернативный класс тестовых примеров).TGUITestCase определяется в единицахGUITesting это ...

2 ответа

+1 хороший ответ. К вашему второму пункту, и почему я решил реализовать его так, как я это сделал: я хотел, чтобы все журналы были в одном месте, чтобы я мог иметь регистраторы графического интерфейса, файловые регистраторы, регистраторы электронной почты и т. Д. Без изменения графического интерфейса. Я могу жить с не очень хорошей производительностью, если дизайн чистый и легко изменяемый.

ько что написал свой собственный каркас регистрации (очень легкий, нет необходимости в большом каркасе регистрации). Он состоит из интерфейса ILogger и ряда классов, реализующих этот интерфейс. Вопрос, о котором у меня есть вопрос, - это ...

6 ответов

@ Давид: Я должен согласиться. Если я переключу порядок операторов в блоке finally, Screen.Cursor не будет изменен обратно, если Obj.Free вызовет исключение. Это оставляет две попытки .. окончательно конструировать как единственно правильное решение, как уже сказал Андреас. Я обычно предполагаю, что назначения Screen.Cursor не могут быть неудачными, но это может быть просто ошибкой.

ите следующий код в качестве примера: procedure TForm1.Button1Click(Sender: TObject); var Obj: TSomeObject; begin Screen.Cursor:= crHourGlass; Obj:= TSomeObject.Create; try // do something finally Obj.Free; end; Screen.Cursor:= crDefault; ...

ТОП публикаций

1 ответ

вот так: ImageList3.Draw (listview1.Canvas, x, y, 0, true);

асширить этот код:ListView в режиме vsReport раскраска элементов и строк [https://stackoverflow.com/questions/6294985/listview-in-vsreport-mode-colouring-of-items-and-rows] рисовать маленькие иконки? и почему у меня есть ошибка «Индекс списка ...

2 ответа

 был закрыт как дубликат к этому.

ерашнего дня все синие точки (скомпилированные строки) в моем исходном коде сдвинуты на одну строку вверх. Итак, первая точка начинается с «var» вместо «begin», а последняя точка находится на одну строку перед последним «end» функции. Я удалил ...

7 ответов

Ответ Родди

у легко конвертировать Delphi TDate в формат ISO 8601, используя это: DateTimeToString(result, 'yyyy-mm-dd', myDate);Какой идиоматический способ сделать обратное преобразование?StringToDateTime() кажется, не существует. Очевидно, что я могу ...

1 ответ

 например, на разработку у меня уйдут месяцы :) (+1)

ользую WMI, чтобы получить все имена производителей вставленных USB-дисков. Код работает отлично, но у меня есть проблема, как определить букву диска, который есть у определенного диска ... Я могу получить только имя устройства, например (\\. \ ...

1 ответ

Как отобразить контекстные меню «Отправить в» и «Открыть с помощью»?

Некоторое время назад я спросил окак открыть контекстное меню Windows (щелчок правой кнопкой мыши) для определенного файла в ...

1 ответ

Вы такой чемпион, достигнув подвига написания этого куска кода в окне браузера!

я есть таблица, содержащая изображение в поле изображения, и я собираюсь поместить их в список изображений. Вот код: ImageList.Clear; ItemsDts.First; ImageBitmap:= TBitmap.Create; try while not ItemsDts.Eof do begin if not ItemsDtsPicture.IsNull ...

1 ответ

Да, понял это вскоре после моего комментария. Теперь другие вопросы :-(

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