Ergebnis der Suchanfrage

• Forum: Object-Pascal / Delphi-Language

  AW: Dateifilter definieren

    Delphi
    by Delbor, 18. Feb 2020
  Hi zusammen
  
  Das obige Beispiel von p80286 hab ich fast identisch übernommen:
  Node.Enabled := False; // Datefilter (Dateiendung) festgestellt. Wenn nein,
  Lextension := ExtractFileExt(aRealName);
  if SameText(FFileType,Lextension) then
  Node.Enabled := True;
  if (FFileType = 'alle Dateien') then
  Node.Enabled := true;
• Forum: Object-Pascal / Delphi-Language

  AW: Dateifilter definieren

    Delphi
    by Delbor, 16. Feb 2020
  Hi hhcm
  
  Das geschieht, wenn dem Treeview ein Knoten für die gefundene Datei hinzugefügt wird:
  procedure TOpenFileFrame.AddNewNode(ParentNode: TTreeNode; const aCaption,
  aRealName: string; aIsdirectory: Boolean);
  var Node: TTreeNode; NameRec: PNameRec; Lextension: String;
  begin
  Node := TVFilesExplorer.Items.AddChild(ParentNode, aCaption);
  if aIsdirectory then
  begin
• Forum: Object-Pascal / Delphi-Language

  Dateifilter definieren

    Delphi
    by Delbor, 15. Feb 2020
  Hi zusammen
  
  Um meinen OpenFileFrame nach bestimmten Dateiendungen zu filtern, habe ich folgenden Typ definiert:
  Const
  TExtendedArray : array of string =('alle Dateien', '.pdf', '.Docx', '.bmp', '.nef', '.jpg', '.png'); //
  
  
  Bei Programmstart (z.B.) befülle ich damit eine Combobox:
  function TFileSearchContainerFrame. FillCmbxFileType: String;
  var i: integer;