skrudjmagdak

Как написать функцию(любую) в delphi, но написанную на assembler’е(т.е. асм код встроенный в delphi), которую потом нужно вызвать.

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

Как в Edit запретить вводить более одной точки? (читать всё…)

Alex Cones

Есть ли в дельфи диалог ввода строки?
Чтоб там был лейбл, эдит и кнопка «ОК»

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

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

Как удалить одинаковые строки из динамического массива в StringList?

Stilet

procedure TForm1.N3Click(Sender: TObject);

var

  isa:integer;

begin

// Создаем временную анонимную переменку

with TStringList.Create do

 begin

// Устанавливаем для нее сортировку и игнор при попытке добавить элемент, который уже есть

  Sorted := true;

  Duplicates := dupIgnore;

//Добавляем весь текст. При этом должна (не уверен) происходить проверка каждого на задвоенность.

  Text := sl.Text;

//Возвращаем назад но уже без дубликатов

  sl.Text := Text;

//Убираем анонимную переменную.

  free;

 end;

 listbox1.Clear;

 for isa:=0 to sl.Count-1 do

 listbox1.Items.insert(isa,extractfilename(sl.Strings[isa]));

 showmessage('Повторяющиеся треки были успешно удалены!');

end;

Пост написан при поддержке РостБанк.

Выгодные вклады в надежном банке по высоким процентам.

тема на форуме

Как нарисовать рамку для Image по нажатию на Image? (читать всё…)

Как определить количество строк в текстовом файле? (читать всё…)

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

Надо, чтобы при нажатии на стрелки в активное окно приходило сообщение, а не переключался фокус на другое окно. Как это сделать? (читать всё…)

tavrocotaps

В Series добавляются точки методом AddXY, поздже необходимо анализировать цвет точек, для вывода табличных данных (в таблицу данные берутся при помощи Series.YValue). Подскажите, как получить цвет, которым отображается точка со значением YValue? (читать всё…)