Как показать, что Vista разрабатывает подсказки воздушного шара в Delphi?

Question

Как показать, что Vista разрабатывает подсказки воздушного шара в Delphi?

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

Если вы не знакомы с тем, как сериализация / десериализация выполняется в C #, используя встроенные библиотеки, вам следует начать с прочтения этого: https://docs.microsoft.com/en-us/dotnet/ csharp / Руководство по программированию / Концепции / Сериализация /

Вот ссылка, чтобы показать, как реализовать двоичную сериализацию: https://docs.microsoft.com/en-us/dotnet/ api / system.runtime.serialization.formatters.binary.binaryformatter? view = netframework-4.7.2

Однако, если вы не пишете исходный файл, вам просто нужно написать собственный десериализатор (который по сути то, что вы сделали - без реализации соответствующих шаблонов .NET). Может быть, попробуйте использовать BufferedStream и посмотреть, поможет ли это, т.е.. :

using (FileStream fs = File.Open(fileName, ..... ))
using (BufferedStream bs = new BufferedStream(fs))
using (StreamReader sr = new StreamReader(bs))
{
        string s;
        while ((s = sr.ReadLine()) != null)
        {
            //your code   
        }
}

Также стоит взглянуть на эту библиотеку, которая может помочь вам с этой задачей: FileHelpers - Посмотрите на этот пример: https://www.filehelpers.net/example/QuickStart/ReadFileDelimited/

8

winapi delphi

задан Attila Szasz 18 November 2008 в 08:54

3 ответа

Другие вопросы по тегам:

winapi delphi

Похожие вопросы:

score 2 · Answer 1

TCustomHint в Delphi, 2009 имеет четыре защищенных перегрузки ShowHint, которые при вызове позволяют Вам размещать TCustomHint по требованию и в определенных местоположениях:

procedure ShowHint; overload;
procedure ShowHint(Point: TPoint); overload;
procedure ShowHint(Rect: TRect); overload;
procedure ShowHint(Control: TControl); overload;

Все, что необходимо сделать, реализовать подсказку в стиле, который Вы хотите (или просто убывайте от TBalloonHint, если это достаточно близко), и обнародуйте те методы, чтобы иметь способность поместить подсказку, где когда-либо и каждый раз, когда Вы хотите.

Примечание: Измените свойство Title TCustomHint для изменения, какой текст отображен, если Вы не используете ShowHint, который берет TControl в качестве аргумента. В этом случае это получает его от свойства Hint управления (и помещает его в свойство Title TCustomHint).

score 16 · Answer 2

Если Вы используете Delphi 2009, то добавление подсказок воздушного шара довольно просто, хотя документация плоха. (удивление, удивление)

Отбросьте TBalloonHint на своей форме
Отбросьте TImageList для содержания значков в случае необходимости.
Свяжите TIMageList с TBalloonHint
Установите свойство CustomHint формы на TBalloonHint
Удостоверьтесь ShowHint и ParentCustomHint установлены верные для Ваших средств управления.

Этот следующий бит очень неочевиден:

Отформатируйте свойство "Hint" своего управления как "Title|Hint|ImageIndex"

Вы сделаны. Это не смотрит подобных перспективе 100%, возможно, из-за выбора шрифта. Но это достаточно близко.

_{(источник: codegear.com)},

score 3 · Answer 3

Как может быть считан в Delphi, 2 009 рецензентов ведут каждый компонент VCL, теперь имеет свойство CustomHint. Это может быть установлено на любого потомка TCustomHint.

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