1. 游客, мы просим Вас ознакомиться с Правилами Форума и Отказом от ответственности!

[Вопрос] Delphi

本贴由 nikes 于 2011-02-18 发布. 版块名称: Delphi

主题状态:
主题已关闭, 停止回复.
  1. TopicStarter Overlay
    nikes

    nikes Программист Пользователи

    帖子:
    90
    支持:
    62
    性别:
    男
    Репутация:
    -2
    Как сделать чтобы при нажатии на кнопку Button1 Мне выкидывало окно и писало текст????
    nikes, 2011-02-18
    #1
    已获得2人支持.
  2. РэПеРоК

    РэПеРоК Пользователи

    帖子:
    46
    支持:
    78
    性别:
    男
    Репутация:
    0
    Application.Messagebox('Текст','Заголовок', mb_iconerror or mb_ok);

    дальше додумашся как
    РэПеРоК, 2011-02-18
    #2
    1 человеку нравится это.
  3. JoLan

    JoLan Команда форума Администратор AngeliCore Программист

    帖子:
    1,061
    支持:
    948
    性别:
    男
    Репутация:
    6
    Команда:
    AngeliCore
    Страна:
    Russian Federation Russian Federation
    ShowMessage('Текст');

    Так же больше люблю это:

    MessageDlg('Текст',type,[Buttons],0);
    type:
    - mtInformation
    - mtError
    - mtWarning

    Buttons: (это массив, поэтому пишется в скобках)
    mbOK
    mbCancel
    mbOKCansel
    mbHelp и т.д.


    Виктор, вызывать application не обязательно.
    JoLan, 2011-02-18
    #3
  4. TopicStarter Overlay
    nikes

    nikes Программист Пользователи

    帖子:
    90
    支持:
    62
    性别:
    男
    Репутация:
    -2
    Как здесь зделать а то не пойму на кнопку Button1
    代码:
    unit Unit1;

interface

uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, StdCtrls;

type
TForm1 = class(TForm)
Button1: TButton;
Button2: TButton;
GroupBox1: TGroupBox;
Edit1: TEdit;
Edit2: TEdit;
private
{ Private declarations }
public
{ Public declarations }
end;

var
Form1: TForm1;

implementation

{$R *.dfm}

end.
    nikes, 2011-02-18
    #4
    已获得2人支持.
  5. JoLan

    JoLan Команда форума Администратор AngeliCore Программист

    帖子:
    1,061
    支持:
    948
    性别:
    男
    Репутация:
    6
    Команда:
    AngeliCore
    Страна:
    Russian Federation Russian Federation
    F12 -> Выбираешь кнопку, в Object Inspector переключаешься на Events, ищешь нужное событие и тычешь 2 раза по нему, после этого у тебя вобьется тело операции, в которой нужно писать код. Если нужно базовое действие (клик по кнопке, изменение TEdit), просто 2 раза щелкни по компоненту.
    JoLan, 2011-02-18
    #5
    1 человеку нравится это.
  6. TopicStarter Overlay
    nikes

    nikes Программист Пользователи

    帖子:
    90
    支持:
    62
    性别:
    男
    Репутация:
    -2
    JoLan СПС лови + тему можно закрывать.
    nikes, 2011-02-18
    #6
    已获得2人支持.
Черновик сохранён Черновик удалён
主题状态:
主题已关闭, 停止回复.

分享此页面