Форум: "Основная";
Текущий архив: 2003.08.11;
Скачать: [xml.tar.bz2];

Вниз

Буфер   Найти похожие ветки 

← →
Юля   (2003-07-28 07:10) [0]

Уважаемые мастера!!! Подскажите что делать. Проблемма в общем не большая: необходимо скопировать в буфер строку. Делаю это так

procedure TForm1.Button1Click(Sender: TObject);
var
Buf:TClipboard;
begin
Buf:=TClipboard.Create;
Buf.AsText:="Строка";
end;


После, в блокноте нажимаю CTRl+V но вместо слова получаю какую-то чушь:

---

← →
gek   (2003-07-28 07:16) [1]

Ну можно попробовать SetTextBuf(Buffer: PChar);

---

← →
Юля   (2003-07-28 07:23) [2]

Не выходит

---

← →
MBo   (2003-07-28 07:27) [3]

var
Buf:TClipboard;
begin
Buf:=TClipboard.Create
предыдущее ни к чему.

проблема в unicode
решение:
http://delphibase.endimus.com/?action=viewfunc&topic=sysiface&id=10253

---

← →
Song   (2003-07-28 09:34) [4]

А зачем TClipBoard создаёшь?

---

← →
Anatoly Podgoretsky   (2003-07-28 09:47) [5]

Тебе намекают, что создавать ничего не надо, надо просто написать Clipboard.AsText := "Строка";

---

Страницы: 1 вся ветка

Форум: "Основная";
Текущий архив: 2003.08.11;
Скачать: [xml.tar.bz2];

Наверх

Память: 0.45 MB
Время: 0.006 c