1. Reklam


    1. kyra
      viki
      Tenda
      lastworld
      silkroadcilar
      3

Programs (Programlar) altındaki grupların listesi


  1. Redefine

    Redefine olduser

    Kayıt:
    21 Kasım 2007
    Mesajlar:
    3.040
    Beğenilen Mesajlar:
    0
    Ödül Puanları:
    36
    [​IMG]

    lll :idea: lll Programs (Programlar) altındaki grupların listesi lll :idea: lll

    Form üzerine bir tane listbox, bir tane Button ve bir tane de DdeClientConv bileşeni koyun. DdeClientConv bileşeninin DDEService ve DDETopic özelliklerini "Progman" (tırnaklar yok) olarak değiştirin ve aşağıdaki kodu yazın;

    Kod:
    procedure TForm1.Button1Click(Sender: TObject);
    var
      P: PChar;
    begin
      ListBox1.Items.clear;
      P := DDEClientConv1.RequestData('Groups');
      ListBox1.Items.SetText(P);
      StrDispose(P);
    end;
     
  2. Leader

    Leader rank8

    Kayıt:
    18 Ağustos 2007
    Mesajlar:
    4.876
    Beğenilen Mesajlar:
    0
    Ödül Puanları:
    36
    Saol Ya Bunu Arıyordum