Delphi - [решено] speedbuton. окно с доп. информацией

[NickDang]

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

[LilLoco]

NickDang, Как вы быстро темы создаете

Если нужно обычное всплывающее окно типа подсказки, то у speedbutton свойство ShowHint ставите в true, а в свойство Hint пишите текст...



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

[NickDang]

Аааа, понял )) всё спасибо!

[NickDang]

ещё возник такой вопрос, как перейти в Hint на следующую строку?

Строка1

Строка2



Искал в интернете, но не понял как делать.

[LilLoco]

Пробовали управляющие символы?

Если нет, то попробуйте между строками вставить #13#10.



Код:

Код: Выделить всё

Первая строка #13#10 Вторая строка

[NickDang]

Ну в параметрах? Hint. Там если просто вписать Первая строка #13#10 Вторая строка то он так и прочитает его...

[NickDang]

NickDang, хорошо бы Вам вначале почитать про типы данных в Delphi и изучить правила записи строковых констант и переменных - сразу поймёте, что это пример гипотетический.

[NickDang]

Скачал исходник, там каждая строка начиналась на @. хм... ничё не получилось, что-то упустил



добавил в форму:



Код:

Код: Выделить всё

procedure TForm1.FormCreate(Sender: TObject);
Var I: Integer;
    S: String;
begin
for I := 0 to ComponentCount -1 do
  if Components[i] is TControl then
    With TControl(Components[i]) Do
    Begin
      S := Hint;
      While Pos('@',S)  0 Do
        S[Pos('@',S)] := #13;
      Hint := S;
    End;
    end;

ВСЁ ПОЛУЧИЛОСЬ)