Einzelnen Beitrag anzeigen

Drumbo

Registriert seit: 18. Okt 2013
22 Beiträge
 
#6

AW: AdvDbgrid Button und Links anzeigen.

  Alt 12. Nov 2013, 15:02
So hab jetzt beide Probleme gelöst.

Die Datei-Links müssen erst ein wenig unformatiert werden.
Dazu packt man seinen Pfad in folgende Funktion

Delphi-Quellcode:
function FilePathToURL(const FilePath: string): string;
var
  Buffer: string;
  BufferSize: DWORD;
begin
  Result := '';
  BufferSize := Length('file:///' + FilePath + #0);
  SetLength(Buffer, BufferSize);

  if UrlCreateFromPath(PChar(FilePath), PChar(Buffer), @BufferSize, 0) = S_OK then
    Result := Buffer;
end;
Der Aufruf folgt beispielsweise so:
edit1.text:=FilePathToURL(path) Dann noch im DBAdvGrid die Eigenschaft "URLShow" auf "True" setzen. Dann öffnet sich beim klicken auf den Link das im PC als Standardprogramm dieses Dateitypes verwendete Programm.

Was das Anzeigen der Knöpfe angeht hab ich mittlerweile schonmal erreicht, dass mir die Knöpfe angezeigt werden. Dies funktioniert mit
Delphi-Quellcode:
i:=1;
while i<DBAdvGrid1.RowCount do
  begin
  DBAdvGrid1.AddButton(4,i,50,15,'Bestellen',haCenter,vaCenter);
  i:=i+1;
  end;
Hierbei wird einfach der Spalte nach die Tabelle durchgegangen und dann der Knopf erstellt. Wie man die Buttons nun Adressiert weiss ich leider noch nicht. Allerdings bin ich hierbei schon kräftig am recherchieren
  Mit Zitat antworten Zitat