Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Основная";
Текущий архив: 2003.02.10;
Скачать: [xml.tar.bz2];

Вниз

как сделать лучше?   Найти похожие ветки 

 
werr   (2003-01-31 10:19) [0]

Нужна программа : нажал кнопку и в буфер скопировалась строка, т.е. Clipboard.AsText := "ааа"; А как грамотнее это оформить? Т.е. в какое событие какого итема засунуть? Application, неверное, не очень подходит.


 
Digitman   (2003-01-31 11:19) [1]


> нажал кнопку


Вот в обработчик события КнопкаClick() и "засовывай"... если уж очень "засунуть" хочется)))


 
Separator   (2003-01-31 11:39) [2]

Clipboard.SetTextBuf(PChar("Текст"));


 
werr   (2003-01-31 16:35) [3]

я неправильно объяснил
надо чтобы кнопка нажималась не на форме, а скажем, запускалась иконка и тогда в буфер записывался нужный текст

Сейчас сделал
procedure TForm1.FormActivate(Sender: TObject);
begin
Clipboard.AsText := "ааа";
Form1.Close;
end;

но тогда при запуске такой иконки на 1 сек появляется форма а потом исчезает, что не очень красиво

а как сделать чтобы запустил прогу и она сразу записала в буфер, не открывая никаких форм


 
Андрей Сенченко   (2003-01-31 16:42) [4]

убрать форму


 
Digitman   (2003-01-31 16:56) [5]

ну что-то типа этого, наверно:

program ...
uses
Clipbrd;
begin
Clipboard.AsText := "ааа";
end.


 
Андрей Сенченко   (2003-01-31 17:18) [6]

werr (31.01.03 16:35)

идея проста - при старте нового проекта Delphi Тебе сразу предлагается пустая форма. Но использовать ее Тебя никто не заставляет - просто удаляещь из текущего проекта Unit1, а весь код пишешь собственно в программе.



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

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

Наверх




Память: 0.45 MB
Время: 0.008 c
14-29055
Adolf
2003-01-22 17:00
2003.02.10
Системные требования


1-28771
Zhker
2003-01-26 20:05
2003.02.10
Tray


8-28933
Виктор_2
2002-10-21 17:39
2003.02.10
Как создать пустой wav-файл


3-28656
CASU
2003-01-22 11:16
2003.02.10
Как отобразить процесс передачи данных на сервер?


3-28690
cult
2003-01-24 13:04
2003.02.10
HELP, не работает связка ADOConnection<-ADOTable :( (MSSQL)





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский