Value List Editor

<quote>Hejsa

Hvordan kan man få indholdet fra den selectede Value i en Value List Editor??


Med venlig hilsen

Mikkel Bøg Clemmensen
mt.clemmensen@vip.cybercity.dk
</quote>


<b>Hej Mikkel!

Jeg håber dette er svaret på dit spørgsmål!
</b>
<pre>

procedure TForm1.Button1Click(Sender: TObject);
begin
//hvis du har en key med "key = key1" og "value = Hej"

showmessage(valuelisteditor1.Values['Key1']);
end;

</pre>


Mvh.
Lars Haslev

Always Look On The Bright Side Of Life! :-)
*********************************

Det var nu den value, som var markeret/selectet.

Med venlig hilsen

Mikkel Bøg Clemmensen
mt.clemmensen@vip.cybercity.dk

<quote>Det var nu den value, som var markeret/selectet.

Med venlig hilsen

Mikkel Bøg Clemmensen
mt.clemmensen@vip.cybercity.dk
</quote>



<b> Hvad så med dette her (?): </b>

----------------------------------------------------------------------

unit Unit1;

interface

uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, StdCtrls, Grids, ValEdit;

type
TForm1 = class(TForm)
ValueListEditor1: TValueListEditor;
Button1: TButton;
procedure Button1Click(Sender: TObject);
procedure ValueListEditor1SelectCell(Sender: TObject; ACol, ARow: Integer; var CanSelect: Boolean);
private
fCol, fRow: Integer;
public
{ Public declarations }
end;

var
Form1: TForm1;

implementation

{$R *.dfm}

procedure TForm1.Button1Click(Sender: TObject);
begin
Caption := ValueListEditor1.Cells[fCol, fRow];
end;

procedure TForm1.ValueListEditor1SelectCell(Sender: TObject; ACol, ARow: Integer; var CanSelect: Boolean);
begin
fCol := aCol;
fRow := aRow;
end;

end.

----------------------------------------------------------------------

Mvh.
Lars Haslev

Always Look On The Bright Side Of Life! :-)
*********************************

Det eneste, som sker, er, at der i formens caption, kommer til at stå "Key"?!

Med venlig hilsen

Mikkel Bøg Clemmensen
mt.clemmensen@vip.cybercity.dk

<quote>Det eneste, som sker, er, at der i formens caption, kommer til at stå "Key"?!

Med venlig hilsen

Mikkel Bøg Clemmensen
mt.clemmensen@vip.cybercity.dk
</quote>


HMM... Jeg får det selectede frem! :-| Hvad mon der er galt...

Jeg må lige gå og tænke over det nogle dage...!


Mvh.
Lars Haslev

Always Look On The Bright Side Of Life! :-)
*********************************

<quote>Det eneste, som sker, er, at der i formens caption, kommer til at stå "Key"?!

Med venlig hilsen

Mikkel Bøg Clemmensen
mt.clemmensen@vip.cybercity.dk



HMM... Jeg får det selectede frem! :-| Hvad mon der er galt...

Jeg må lige gå og tænke over det nogle dage...!


Mvh.
Lars Haslev

Always Look On The Bright Side Of Life! :-)
*********************************</quote>

Åhhh, jeg kom i tanke om dette (jeg har ikke selv prøvet det, men tror det virker!):

Prøv denne kode:

<pre>
ValueListEditor.Selected
</pre>


Mvh.
<b>Lars Haslev</b>

Always Look On The Bright Side Of Life! :-)
*********************************

Kvalificeret gæt, men desværre, der findes procedure, med det navn?!

Med venlig hilsen

Mikkel Bøg Clemmensen
mt.clemmensen@vip.cybercity.dk

Jeg kan heller ikke forstå, hvad at denne procedure gør godt for. Man kan ligeså godt fjerne den?! Prøv lige at køre den kode som du gav mig tildligere i indlægget, den giver altså ikke andet end 'Key' i formens caption.


Med venlig hilsen

Mikkel Bøg Clemmensen
mt.clemmensen@vip.cybercity.dk

denne procedure:

<pre>
procedure TForm1.ValueListEditor1SelectCell(Sender: TObject; ACol, ARow: Integer; var CanSelect: Boolean);
begin
fCol := aCol;
fRow := aRow;
end;
</pre>

<quote>denne procedure:

<pre>
procedure TForm1.ValueListEditor1SelectCell(Sender: TObject; ACol, ARow: Integer; var CanSelect: Boolean);
begin
fCol := aCol;
fRow := aRow;
end;
</pre></quote>



Du har fuldstændig ret... hmmm... Underligt... Jeg synes da ellers.... hmmm....
Har du kigget på andre "Udvikler"-sites på nettet?


Mvh.
Lars Haslev

Always Look On The Bright Side Of Life! :-)
*********************************