Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by scp,
10. Nov 2003
@chris
Dazu ein Tip: Du solltest immer in jeder Zeile soviele Subitems hinzufügen, damit alle Columns gefüllt sind.
Wenn kein Text drin sein soll, machst du einfach ein
Add('');
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by scp,
10. Nov 2003
function LVIndexByCaption(ListItems : TListItems; cText : String) : Integer;
var
I: Integer;
begin
result := -1;
for i := 0 to (ListItems.Count-1) do
If (ListItems.Caption = cText) then
begin
result := i;
Break;
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by scp,
10. Nov 2003
Machs doch so:
begin
with listview1.Items.add do
begin
Caption := 'test';
Subitems.Add('test1');
SubItems.Add('test2');
end;