Необходимо выполнить чтение из буфера результата cmd, делаю следующее:

procedure TForm1.Button2Click(Sender: TObject);
var
  s:TStringList;
  i: integer;
begin
  s:=TStringList.Create;
  Clipboard.AsText:='';
  WinExec('cmd /c net user |clip',SW_SHOWNORMAL);
  S.Text:= Clipboard.AsText;
  for I := 0 to s.Count-1 do
    Memo1.Lines.Add(s[ i]);
  s.Free;
end;

В результате Memo пустое, но в буфере есть необходимая инфа, по Ctrl+V выводится. Что делаю не так?

(читать всё…)

Пожалуйста,помогите сделать экспорт из Memo в Word.

(читать всё…)

Не могу сделать автоматическое переключение на следующий трек при воспроизведении. Может, подскажет кто-нибудь какой нужен код для этого? Использую стандартный компонент TMediaPlayer.

(читать всё…)

Есть такой расклад: в организации несколько компьютеров, объединенных единой локальной сетью, друг друга видят. Пишу программу с использование Firebird и Delphi. Сервер Firebird будет (по ТЗ) установлен на каждой машине. Файл FDB будет размещаться только на одной машине, все остальные компьютеры будут подключаться по локальной сети к нему. Собственно вопрос вот в чем: что и какие настройки нужно прописать (задать) при подключении клиентов к файлу БД? Только IP адрес и полный путь до файла? Как он правильно должен выглядеть?

(читать всё…)

Есть ссылка,как удалить http:// и все что после / в нашем случае blablabla
http://www.site.com/blablalbla

(читать всё…)

Есть ли какие быстрые способы в делфи отразить по вертикали, горизонтали, перевернуть изображение на 90, 180 градусов, кроме как попиксельная перерисовка?

(читать всё…)

Передо мной такая задача:
Мне нужно щёлкнуть кнопкой мыши на определённый столбец в DBGRid (не на заголовок) и по щелчку мышью получить название поля данных, чтобы потом изменить данные этой ячейки. Как это лучше сделать?

(читать всё…)

При помощи процедур написать программу. При вводе слова с клавиатуры считать количество гласных букв (английских) в нём.

(читать всё…)

Может кто сталкивался, при наведение курсора на legend текст закрашивается красным цветом, и кусок DonutSeries выделяется (this is a default). Как поменять на другой цвет или как обратиться к конкретному тексту в legend?

— TeeChart 2 0 1 6

(читать всё…)

Подскажите, как склеить текст в двух мемо по первым символам
в первом мемо есть LK-12430………(начало строки), во тором есть LK-12430, то есть надо склеить эту строку и вывести результат в мемо3

(читать всё…)