Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Delphi программирование > Общие вопросы Delphi
Регистрация

Восстановить пароль

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 03.02.2011, 20:29   #1
Palach21
 
Регистрация: 13.12.2010
Сообщений: 3
Злость Вопрос по клиенту

Доброго времени суток. У меня проблемка со стиранием в окне браузера.я сделал браузер только для одного сайта .то-есть заходишь на сайт а он написан на флэш и там можно писать а вот стирать не получается стирает только если выделить и нажать делит только в этом случие удаляется текст.
вот код
Код:
unit Unit1;

interface

uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs, OleCtrls, SHDocVw, Menus;

type
  TForm1 = class(TForm)
    WebBrowser1: TWebBrowser;
    MainMenu1: TMainMenu;
    N1: TMenuItem;
    ExtrimRadio1: TMenuItem;
    Extrim1: TMenuItem;
    Cs161: TMenuItem;
    N2: TMenuItem;
    procedure FormCreate(Sender: TObject);
    procedure ExtrimRadio1Click(Sender: TObject);
    procedure Extrim1Click(Sender: TObject);
    procedure Cs161Click(Sender: TObject);
    procedure N2Click(Sender: TObject);
  private
    { Private declarations }
  public
    { Public declarations }
  end;

var
  Form1: TForm1;

implementation

uses Unit2, Unit3, Unit4, Unit5;

{$R *.dfm}

procedure TForm1.FormCreate(Sender: TObject);
begin
WebBrowser1.Navigate('http://extrim-th.ru/');
WebBrowser1.Width:=Form1.Width;
WebBrowser1.Height:=Form1.Height;
end;

procedure TForm1.ExtrimRadio1Click(Sender: TObject);
begin
Form2.Show;
end;

procedure TForm1.Extrim1Click(Sender: TObject);
begin
Form3.Show;
end;

procedure TForm1.Cs161Click(Sender: TObject);
begin
Form4.Show;
end;

procedure TForm1.N2Click(Sender: TObject);
begin
Form5.Show;
end;

end.

Последний раз редактировалось Stilet; 03.02.2011 в 22:07.
Palach21 вне форума Ответить с цитированием
Старый 03.02.2011, 22:09   #2
Stilet
Белик Виталий :)
Старожил
 
Аватар для Stilet
 
Регистрация: 23.07.2007
Сообщений: 57,097
По умолчанию

Цитата:
а вот стирать не получается стирает
Автоматически стирать?
I'm learning to live...
Stilet вне форума Ответить с цитированием
Старый 03.02.2011, 22:15   #3
Palach21
 
Регистрация: 13.12.2010
Сообщений: 3
По умолчанию

Цитата:
Сообщение от Stilet Посмотреть сообщение
Автоматически стирать?
при нажатии на Backspase не риагирует.приходиться выделять весть текс и жать делит только так.а надо что бы на Backspace стирало
Palach21 вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Отправка сообщения с сервера клиенту. securus Работа с сетью в Delphi 0 31.08.2010 03:32
Каждому клиенту по потоку. ImmortalAlexSan Работа с сетью в Delphi 1 01.07.2010 17:45
Передать файл клиенту BlackOmen JavaScript, Ajax 7 26.06.2008 11:36
Ответ клиенту... prizrak1390 Работа с сетью в Delphi 8 22.05.2008 11:34
Передача команд серверу и клиенту OrdJONY Работа с сетью в Delphi 9 28.08.2007 10:51