Einzelnen Beitrag anzeigen

Benutzerbild von yankee
yankee

Registriert seit: 10. Mär 2004
1.134 Beiträge
 
Lazarus
 
#3

Re: [SynEdit]: CodeCompletion in Spalten organsieren

  Alt 29. Apr 2005, 22:53
Mache ich ja. Mal der ganze Code:
Delphi-Quellcode:
procedure TMainForm.readAutoCompletion(const lang: string);
var ini: TIniFile;
    SG: TStrings;
    i,thepos:integer;
begin
    ini :=TIniFile.Create(extractFileDir(Paramstr(0)) + '\data\CodeCompletion.ini');
    if ini.SectionExists(lang) then
    begin
        SG :=TStringList.Create;
        ini.ReadSectionValues(lang, SG);
        for i:=0 to SG.Count -1 do
        begin
            thepos :=pos('=',SG.Strings[i]);

            SynCompletionProposal1.ItemList.Add('\style{+B}'+lang+'\style{-B} \column{}'+copy(SG.Strings[i], 0, thepos-1));
            SynCompletionProposal1.InsertList.Add(copy(SG.Strings[i], thepos+1, length(SG.Strings[i])));
        end;
        SG.Free;
    end;
    ini.Free;
end;
Aber die Insertlist wird doch garnicht angezeigt...
Letzter Tipp: Drogen. Machen zwar nicht glücklich, geben einem aber wenigstens das Gefühl glücklich zu sein.

Have a lot of fun!
  Mit Zitat antworten Zitat