Буфер обмена, FreePascal |
Наладить общение поможет, если вы подпишитесь по почте на новые темы в этом форуме.
Буфер обмена, FreePascal |
Bokul |
Сообщение
#1
|
Гуру Группа: Пользователи Сообщений: 1 117 Пол: Мужской Реальное имя: Богдан Репутация: 11 |
Как скинуть в буфер обмена(Ctrl+C) текстовую информацию?
-------------------- Лао-Цзы :
Знать много и не выставлять себя знающим есть нравственная высота. Знать мало и выставлять себя знающим есть болезнь. Только понимая эту болезнь, мы можем избавиться от нее. |
Bokul |
Сообщение
#2
|
Гуру Группа: Пользователи Сообщений: 1 117 Пол: Мужской Реальное имя: Богдан Репутация: 11 |
Спаибо Volvo, теперь все работает . Компилятор и раньше писал что-то про mode, только я поставил вместо {$mode DELPHI} {$mode ObjFpc}.
Осталось несколько моментов, которые я не понял: Цитата Setlength(S, MAX_PATH + 1); Откуда взялась переменная MAX_PATH? Или это константа? Чему она ровна? Цитата C := S[1]; S[1] := '$'; --------- S[1] := C; Для чего сначала первому символу строки присваивать символ '$', а потом возвращать предыдущее значение? Чтобы снизить вероятность нахождения другого окна с тем же именем? Цитата chiBuffer: string; ---------------------- for i := 0 to pred(rd) do begin chiBuffer := chiBuffer + buf[i]; Сколько символов помещается в string? Я думал 255... а тут получается больше 400 - rd = size = 80 * 50, да плюс еще 50 раз по #13#10. Получается 500 символов. Я не прав? Сообщение отредактировано: Bokul - -------------------- Лао-Цзы :
Знать много и не выставлять себя знающим есть нравственная высота. Знать мало и выставлять себя знающим есть болезнь. Только понимая эту болезнь, мы можем избавиться от нее. |
Текстовая версия | 15.05.2024 1:09 |